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Algoritmos y 
programas 


1.1. Resolución de problemas por computadoras 

La prìncipal razón para que las personas aprendan lenguajes de programación es utilizar la coraputado- 
ra como una heriamienta para la resohición de probiemas. Dos fases pueden ser identìficadas en el 
proceso de resolución de problemas ayudados por computadora: 

- Fase de resolución dei problema. 

• Fase de impletnentación (fealización) en un ienguaje de programación, 

1. 1. 1. Fase de resoiución dW problema 

Bsta fase incìuye, a su vez» el análisis del problema así como el diseno y posterior verìficación del 
algoritmo. 
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Fase cte resolución del problema Fase de irabajo en Jta computadora 



1.1. 1.1. Análisis del probïema 

E1 prímer paso para encontrar la solùción a un problema es el análisis del mìsmo. Se debe examinar 
cuidadosamente el problema a fin de obtener una idea clara sobre lo que se solicita y determinar los 
datos necesarios para conseguirlo. 
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LLL2* Diseno deì algoritmo 

La palabra algoritmo deriva del nombre del famoso matemático y astrónomo árabe Al-Khôwarizmi 
(sigló IX) que escribió un conocido tratado sobre la maniputación de números y ecuaciones titulado 
Kitab al-jabr w ? almugabala. 

Un algoritmo puede ser defînido como la secuencia ordenada de pasos, sin ambiguedades, que 
conducen a la solución de un problema dado y éxpresado en lenguaje natural, por ejemplo el castellano. 

Todo algoritmo debe ser: 

* Preciso. Indicando el orden de realización de cada uno de los pasos. 

* Definido. Si se sigue el algoritmo varias veces proporcionándole los mismos datos, se deben 
obtener siempre los mismos resultados, 

* Fínito. A1 seguir el algoritmo, éste debe terminar en algún momento, es decir tener tm número 
fmito de pasos, 

Para disenar un algoritmo se debe comenzar por identificar las tareas más importantes para resoi- 
ver el problema y disponerlas en el orden en el que han de ser ejecutadas. Los pasos en esta primera 
descripción de actividades deberán ser iefinados ? anadiendo más detalles a los mismos e incluso, algu- 
nos de ellos, pueden requerir un refínamiento adicional antes de que podamos obtener un algoritmo 
claro, preciso y completo. Este método de díseno de los algoritmos en etapas, yendo de los conceptos 
generales a los de detalle a través de refínamientos sucesivos, se conoce como método descendente (top- 
down). En un algoritmo se deben de consíderar tres partes: 

* Entrada. Información dada al algoritmo. 

* Proceso. Operacìones o cáiculos necesarios para encontrar la solución del problema. 

* Salida. Respuestas dadas por el algoritmo o resultados fìnales de los cálculos. 

Como ejemplo imagine que desea desarrollár un algoritmo que calcule la superfície de un rectán- 
gulo proporcionándole su base y altura. Lo primero que deberá hacer es plantearse y contestar a las 
siguientes preguntas: 


Especifìcaciones de entrada 

^Qué datos son de entrada? 

^Cuántos datos se introduciran? 
^Cuántos son datos de entrada válidos? 


Especificaciones de salída 

^Cuáles son los datos de salida? 
^Cuántos datos de salida se producirán? 
^Qué precisión tendrán los resultados? 
^Se debe imprimir una cabecera? 



4 Fundamentos de Programacíón, LíbrodePmbiemas 


E1 algoritmo en el primer diseno se podrá representar con los siguientes pasos: 

Paso L Entrada desde periférico de entrada, por ejemplo teclado, de base y altura* 

Paso 2. Cálcuïo de la superficíe, multiplicando la base por la altura, 

Paso 3. Salída por pantaïla de base, altuia y superficie. 

E1 lenguaje algorítmico debe ser independiente de cualquier lenguaje de programación particular, 
pero fácilmente traducible a cada uno de ellos. Alcauzar estos objetivos conducirá al empleo de méto- 
dos nomtalizados para la representación de algoritmos, tales como los diagrama de fiujo, diagrama 
Nassi-Schneiderman o pseudocódígo, comentados más adelante. 


1.1.13. VerificQción de algoritmos 

Una vez que se ha terminado de escribir un algoritmo es necesario comprobar que realiza las tareas 
para las que se ha disenado y produce el resuJtado correcto y esperado. 

El modo más normal de comprobar un algoritmo es mediante su ejecucíón manual ? usando datos 
significativos que abarquen todo el posible rango de valores y anotando en una hoja de papel las modi- 
ficacíones que se producen en las diferentes fases hasta la obtención de los resultados. Este proceso se 
conoce como prueba de) algoritmo. 


1 , IJZ. Fase de imptementación 

Una vez que el algoritmo está disenado, representado graficamente mediante una herramienta de pro- 
gramación (diagrama de flujo, diagrama N-S o pseudocódigo) y verificado se debe pasar a la fase de 
codificación, traducción del algoritmo a un determinado lenguaje de programación, que deberá ser 
completada con la ejecución y comprobacíón del programa en eï ordenador. 

1.2. Datos 

Dato es ïa expresión general que describe los objetos con los cuales opera el algontmo* Los datos 
podran ser de los siguientes tipos: 

* entero. Subconjunto finìto de los números enteros, cuyo rango o tamano dependerá del len- 
guaje en el que posteriormente codìfiquemos el algoritmo y de la computadora utilizada. 

* real . Subconjunto de los números reales limitado no sólo en cuanto al tamano, sino también en 
cuanto a la precisióm 

* Lógico Conjunto formado por los valores Verdad y Falso. 

* Carácter. Conjunto fmito y ordenado de los caracteres que la computadora reconoce. 

* Cadena. Los datos (objetos) de este tipo contendrán una serie fmita de caracteies, que podrán 
ser directamente traidos o envìados a/desde consola. 

entero, real, carácter, cadena y lógico son tipos predefinidos en la mayoría de los 
lenguajes de programación. En los algoritmos para indicar que un dato es de uno de estos tipos se 
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declarará así, utìfìzando diiectamente el identifícador o nombre del tipo. Además el usuarío podrá de- 
fìnir sus propíos ttpos de datos* 

Lo usua\ es que se defìnan nuevos tipos de datos agmpando valores de otros tipos defínidos previa- 
mente o de tipos estándar. Por este motivo se dice que están estructurados. Si todos los valores agnipa- 
dos ftieran det mtsmo tipo a éste se le denominaría tipo base. A1 establecer un tipo para un dato hay que 
considerar las operacíones que vamos a realizar con él y los instrumentos disponibles. A1 establecer el 
típo se determina la forma de representación en memoría* Los datos pueden venir expresados como 
constantes, variables, expresiones o ftmciones. 


U. 1. Constantes 

Son datos cuyo vaior no cambia durante todo el desarrollo del algoritmo, Las constantes podrán ser 
literaies o con nombres. 

Las constantes simbóìicas o con nombre se identífîcan por su nombre y el valor asìgnado. Una 
constante ïiteral es un valor de cualquier tipo que se utiliza como tal. Tendremos pues constantes: 

* Nvunérícas eateim. En el rango de los enteros* Compuestas por el signo (+,-) seguido de una 
seríe de digHos ((L9). 

* Numérîcas reales. Coínpuestas por el signo (+,-) seguido de una seríe de digitos (0..9) y un 
punto decimal (.) o compuestas por el signo (+ T -) T una seríe de dígitos (0-9) y un punto decimal 
que constituyen la mantisa, ïa letra E antes del exponente T el signo (+ T -) y otra seríe de dígitos 
(0-9). 

* Lógpcas. Sóìo existen dos constantes lógicas T verdad y falso 

* Carícten Cualquier carácter del juego de caracteres utilizado colocado entre comillas simples 
o apóstrofes. Los caracteres que reconocen las computadoras son dígitos, caracteres alfabéticos, 
tanto mayusculas como minúsculas, y caracteres especiales. 

* Cadena. Seríe de caractenes válidos encerrados entre comillas simples. 


Variables 

Una variable es un objeto cuyo valor puede cambiar durante el desarrollo del algoritmo. Se identifica 
por su nombre y por su tipo, que podrá ser cualquìera, y es el que detennma el conjunto de valores que 
podra tomar la variable. En los algoritmos se deben declarar las variables. Cuando se traduce el algorit- 
moaun lenguaje de programación y se ejecuta el programa resultante, la declaracíón de cada una de 1a$ 
variables originaiá que se reserve un detenninado espacio en memoria etiquetado con el correspondien- 
te identificador. 

1.2.3. Expresiones 

Una expresìón es una combinación de operadores y operandos. Los operandos podrán ser constantes. 
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variables u otras expresíones y los operadores de cadena, aritmétìcoSj relacionales o lógicos* Las expre- 
siones se clasìfican, segun el resultado que producen, en: 

* Numéricas. Los operandos que iiitervienen en ellas son numéricos, el resultádo es tambíén de 
tipo numérico y se construyen mediante los operadores aritméricos. Se pueden considerar análo- 
gas a las fórmulas matemáticas. 

Debido a que son los que se encuentran en la mayor parte de los lenguajes de programación, los 
algoritmos uriHzarán los siguientes operadores aritméticos: menos unario (-), multiplicacióri 
(*), divisìón real(/), exponenciación ( A ), adición (+), resta (-), módulo de la dívisión entera 
(mod) y cociente de la división entera (div)* Tenga en cuenta que la división real siempre dará 
un resultado real y que los operadores mod y div sólo operan con enteros y el resultado es 
entero. 

* Àlfanuméricas. Los operandos son de tipo alfanumérico y producen resultados también de di- 
cho tipo, Se construyen mediante el operador de concatenación, representado por el operador 
ampersand (&) o con el mismo símbolo utilizado en las expresiones aritméticas para la suma. 

* Booleanas. Su resultado podrá ser verdad o f also. Se construyen mediante los operadores 
relacionales y lógicos, Los operadores de relación son: igual (=), distinto (o) f menor que (<), 
mayor que (>), mayor o igual (>=), menor o igual (<=). Àctúan sobre operandos del mismo tìpo 
y siempre devuelven un resultado de tipo lógico. Los operadores lógicos básicos son: negación 
lógica (no) } multiplicación lógica (y), suma lógica (o). Actuan sobre operandos de tipo lógico y 
devuelven resultados del mismo tipo, determinados por las tablas de verdad correspondientes a 
cada uno de ellos. 


a 

b 

no a 

ayb 

aob 

verdad 

verdad 

falso 

verdad 

verdad 

verdad 

falso 

falso 

falso 

verdad 

falso 

verdad 

verdad 

falso 

verdad 

falso 

falso 

verdad 

falso 

falso 


E1 orden de prioridad general adoptado, no común a todos los lenguajes, es el siguiente: 
A Exponenciación 

no ? - Operadores unarios 

/ ? div, mod, y Operadores multiplicativos 


+ ? o Operadores aditívos 

o } > } < } >= } <= Operadores de reìación 

La evaluación de operadores con la misma prioridad se realizará siempre de izquierda a derecha. 
Si una expresión contiene subexpresiones encerradas entre paréntesis, dichas subexpresiones se eva- 
luarán primero. 
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1.2.4. Funciones 

Eri los lenguajes de programación existen ciertas funciones predefinidas o intemas que aceptan unos 
argumentos y producen un valor denominado resultado. Como funciones numéricas, se usarán: 


Funcion 

Descripción 

Tipo de argumento 

Resultado 

abs(x) 

valor absoluto de x 

entero o real 

ígual que el argumento 

arctan{x) 

arcotangente de x 

entero o real 

real 

cos(x) 

cosenode x 

entero o real 

real 

cuadrado(x) 

cuadrado de x 

éntôro o real 

iguai que el argumento 

ent(x) 

entero de x 

real 

entero 

exp{x) 

e elevado a x 

entero o real ' 

real 

!n(x) 

logaritmo neperioano de x 

entero o real 

real 

Iog10(x) 

logaritmo base 10 de x 

entero o redl 

rea! 

raíz2(x) 

ráiz cuadrada de x 

entero de x 

real 

redondeo(x) 

redondea x al entero más proximo 

real 

entero 

sen(x) 

seno de x 

entero o real 

real 

trunc(x) 

parte entera de x 

! real 

entero 


i 


Las funciones se utilizarán escribiendo su nombre, seguido de los argumentos adecuados encerra- 
dos entre paréntesìs, en una expresión. 

1.2.5. Regias para ia construcción de identificadores 

Identificadores son los nombres que se dan a las constantes simbólicas, variables, funciones, procedi- 
mientos, u otros objetos que manipula el algoritmo. La regla para construir un identifîcador establece 
que: 

• debe resultar significativo, sugiriendo lo que representa. 

• no podrá coincidir con paiabras reservadas, propias deí lenguaje algorítmico, Como se verá más 
adelante, la representación de algorítmos mediante pseudocódigo va a requerír la utilización de 
palabras reservadas. 

• se admitirá un máximo de 32 caracteres. 

• comenzará siempre por un carácter aifabético y los siguientes podrán ser letras, dígitos o el 
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símbolo de subrayado. 

• podrá ser utìlizado indistmtamente escrito en mayósculas o en minúsculas. 

1.3. Eierclcios resueltos 


Desarrolle los algoritmos qvte îesuelvaa Los siguientes problemas: 

LL Ir ai cine. 

Anáíisis del proMema 

DATOS DE SALIDÀ: Ver la pelicula 

DATOS DE ENlltADA: Nombre de la película, direcctón de ia sala, hoca de proyeccìón 

DATOS AUXILIARES: Entrada, ûumero de asioito 

Para solucionar el problema, se debe seleccionar una peiicula de la cartelera del periódico, ir a la sala y 
comprar ta entrada para, finaïmentc, poder ver la película 


Diseno d d algoritmo 

ìnicio 

//seleccionar Xa película 
tomar el periódico 

mientras no llegemos a la cartelera 
pasar la hoja 

mientras no se acabe la cartelera 
leer película 
si nos gusta , recordarla 
elegir una de las películas seleccionadas 

leer la dirección de la sala y la hora de prqyección 

/ /coïtï>rar la entrada 
trasladarse a la sala 
si no hay entradas, ir a fin 
si hay cola 

ponerse el último 

mientras no lleguemos a la taquilla 
avanzar 

si no hay entradas t ir á fin 
comprar la entrada 

//vér la película 

leer el ndmero de asiento de la entrada 
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buscar el asiento 
sentarse 
ver la película 
f in 


L2* Comprar una entrada para ir a los torus. 


AnáHsis dei problema 

DATOS DE SALIDA: La entrarîa 

UAI OS DE ENTRADA: Tìpo de entiarîa (sot, sombra, tendído, andanarîa,».) 

DATOS AUXHJARES: Disponibilidad de la entrarîa 

Hay que ir a la taquìlla y elegir ta entrada deseada. Si hay entradas se compra (en taqurîla o a los 
reventas). Si no la hay, se puede seleccionar otro tìpo de entrarîa o rîesistir, repitiendo esta acción hasta 
que se ha consegnido la entrada o el posible comjHador ha desistírîo. 


inicio 

ir a la taquilla 

si no hay entradas en taquillu 

si nos interesa ccffnprarla en la reventa 
ir a coitïjrar la entrada 
si no ir a fin 

/ /comprar la entrada 
seleccionar sol o sooibra 

seleccionar barrera, tendido, andanada o palco 
seleccionar número de asiento 
solicitar la entrada 
si la tienen disponible 
adquirir la entrada 
si no 

si queremos otro tipo de entrada 
ir a comprar la entrada 

f in 


Aì Poner ìa mesa para ìa comida. 


Análisis del proMema 


DATOS DE SALIDA: 


La mesa puesta 
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DATOS DE ENTRADA: La vajilla, los vasos, los cubiertos, la servilletas, el número de comensalés 

DATOS AUXÏLIARES: Número de platos, vasos, cubiertos o servilletas que llevamos puestos 

Para poner la mesa, después de poner el mantel, se toman las servilletas hasta que su número coincide 
con el de comensales y se colocan. La operación se repetirá con los vasos, platos y cubiertos* 


Diseno del algoritmo 

inicio 

poner el mantel 

repetir • •• . •" 

tomar una servilleta , . .. . L ,- . - ; 

hasta gue el numero de s'ervìlletas es igual al de comensales 

repetir ' ' 

tomar ' urí váso ' ' " ' ' ■.■,.■■■•■■ 

hasta gue el numero de vasós 'es r ìgual 'al : de' comehsales 

repetir 

tomar un juego de platos 

hasta gue el número de juegos es igual al de comensales 
repet ir 

tomar un juego de cubiertos 

hasta que el numero de juegos es igual al de comensales 
f in 


1.4. Hacer una îaza de té. 

Anátìsis del problema 

DATOS DE SALIDA: taza de té 

DATOS DE ENTRADÁ: bolsa de té, agua 

DATOS AUXILIARES: pitido de la tetera, aspecto de la infusión 

Después de echar agua en la tetera, se pone al fuego y se espera a que el agua hierva (hasta que suenà el 
pitido de ta tetera)* Introducimos el té y se deja un tìempo hasta que está hecho. 


Diseno del algoritmo 


inicio 

tomar la tetera 
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•lXenarla : de, : $gu : a- 
encender el. í-u.ego .. ■ ■ 
poner la tetera en el fnego 
mientras no hierva el . agua 
esperar 

tomar Xa bolsa de té 
introducìrXa en la tetera 
mientras no esté hecho el té 
esperar 

echar el té en la taza 
f in 


2.5. Fregar los platos de la comida, 

AnáUsis deì problema 

DATOS DE SALIDA: platos limpios 

DATOS DE ENTRADA: platos sucios 

DATOS ÀUXILIARES: número de platos que quedan 

Diseno del algoritmo 

inicio 

abrir el'-grìfo 
tomar el estropaj o 
echarle jabón ■ . . . ■ 

mìentras queden pla.tos 
lavar el pXato 
acXararlo 

dejarlo en eX". escurrrdor^, ... . .;.... 

mientras queden platos en -eX ' .esçurridor 
secar plato. ■ . 

fin " 


L6. Repamr un pinchazo de ímaM<dclgta.: ■ 

Análisis detprobtéma ' 

DATOS DE SAUDA: la rueda reparada 

DATOS DE ENTRADA: la rueda pinchada f los parches* el pegamento 

DATOS AUXILIARES: las burbujas que salen donde esta el pinchazo 

Después de desmontar la rueda y la cubierta e inflar la cámara f se introduce la cámara por secciones en 
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un cubo de agya. Las burbujas de aire indicarán cJonde está el pmchazo. Una vez descubierto el pïncha- 
zo se aplica el pegamento y ponemos el parche, Finaìmente se montan la cámara, ta cubierta y la nieda. 


Diseno del algoritmo 

inicio 

desmontar la rueda 
desmontar la cubierta 
sacar la cámara 
inflar la cámara 

meter una sección de la cámara en un cubo de agua 
mient ras no salgan burbuj as 

meter una seccidn de la cámara en un cubo de agua 
marcar ei pinchazo 
echar pegamento 
mientras no esté seco 
esperar 

poner el parche 
mientras no esté f i jo 
apretar 

montar la cámara 
montar la cubierta 
montar la rueda 
f in 


L 7 , 1 Pagar una multa de tráfico. 


Ânátisis deí probtema 

DATOS DE SALEDA: el recibo de baber pagado la multa 

DATOS DE ENTRADA: datos de la multa 

DATOS AUXILIARES: impreso de ingreso en el banco, dinero 

Debe elegír cómo desea pagar la multa, si en metálico en la Delegación de Tráfico o por medío de una 
transferencia bancaria. Si elige el primer caso T tiene que ir a la Delegacìón Provmcial de Tráfìco, 
desplazarse a 1a ventanilla de pago de multas, pagarla en efectivo y recoger el resguardo. 

Si desea pagarla por transfercncia bancaria, hay que ír al banco, rellenar el impreso apropiado, 
dirigirse a la ventanilla, entregar el impreso y recoger el resguardo. 


Diseno del algoritmo 

inicio 

si pagamos en efectivo 



Atgûritnrayprogj&mas 13 


ir a la Delegacìón de Tráfìco 

ir a la ventanilla de pago de multas 

si hay cola 

poneirse el último 

mientras no lleguemos a la ventanilla 
esperar 

entregar la multa 
entregar el dinero 
recoger el recibo 
si no 

/ / pagamo s po r t r a s f er enc ia banca r i a 
ir al banco 
rellenar el impreso 
si hay cola 

ponerse el último 

mientras no lleguemos a la ventanilla 
esperar 

entregar el ìmpreso 
recoger el resguardo 

fìn 


L8. Hacer una llamada telefónica. Considerar los casos: a) ìlamada manual con operodor; b) 
llamada auíomàíica ; c) Uamada a cobro revertido. 


Anátísis del problema 


Para decidir el típo de Uamada que se efectuará, primero se debe considerar $i $e dispone de efectìvo o 
no para realizar la Hamada a cohro revertido. Si hay efectívo se debe ver $i el lugar a donde vamos a 
llamar está conectado a la red automática o no. 

Para una llamada con operadora hay que llamar a ta centralita y soïicitar la llamada, esperando 
hasta que se establezea la comuiucación. Para una ltamada automátíca se leen los prefijos del pais y 
provincia si fiiera necesario, y se realiza la llamada, esperando hasta que cpjan el teléfono. Para llamar 
a cobro revertido se debe llamar a centralita, solicitar la llamada y esperar a que el abonado del teléfono 
al que se llama désu autorizacíón, con Lo que se establecerá ïa comunicación. 

Como datos de entrada tendríamos las variabies que nos van a condicionar el tipo de tlamada, el 
número de teléfono y, en caso de llamada automática, los prefijos si los hubiera, Como dato auxiliar se 
podría considerar en los casos a y c el contacto con la centralita. 


Diseno del algoritmo 


ìnicio 

si tenemos dinero 
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sí podemos hacer una llamada aatomática 
leer el prefijo de paxs y localidad 
marcar el mxrnero 
si no 

/ / 1 lamada mamial 
llamar a la centralita 
solicitar la comunicación 
mientras no contesten 
esperar 

establecer convunicación 
si no 

//realizar una llamada a cobro revertido 

llamar a la centralita 

solicitar la llamada 

esperar hasta tener la autorización 

establecer comunicación 


L9* Cambiar el cristal roto de îa ventana. 


Análisis del problema 

DATOS DE SALIDA: la ventana con el cristal nuevo 

DATOS DE ENTRADA: el cristal nuevo 

DATOS AUXILIARES: el número de clavos de cada una de las tnoìduras 


Diseno del algoritmo 

inicio 

repetir cuatro veces 
quitar un clavo 

mientras el numero de clavos quitados no- sea igual al. total de clavos 
quitar un clavo 
sacar 'la moldura 
sacar el cris'tal roto 
poner el cristal nuevo 
repetir cuatro veces 
poner la moldura 
poner un clavo 

mientras el numero de clavos puestos no sea igual al total de clavos 
poner un clavo 
poner el cristal nuevo 
f in 
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1*10* Realizar una ttamada telefónica desde un telêfono público. 


Análisis del problema 

DATOS DE SALIDA: la comunicación por tdéfono 

DATOS DE ENTRADA: cl número de teléfono, el dinero 

DATOS AUXILIARES: distíntas seflales de la llamada (comunicando, etc.) 

Se debe ir a la cabina y esperar si hay cola, Entrar e introdueir el dinero. Se marca el numero y se espera 
la senal, si está comunicando o no contestan se repite la operación hasta que descuelgan elteléfono o 
decide irse. 


Diseno del algoritmo 




16 FurriamentosdePmgrarr^^ 

7_Ii, Àveriguar si una palabra es un palíndromo. Un palindromo es una palabra que se lee iguaì âe 
izquierda a dereeha que de derecha a izquierda, como por ejemplo, ‘radar \ 

Anáíisis del problema 

DATOS DE SALÏDA: el mensaje que nos dice si es o no un palíndromo 

DATOS DE ENTRADA: palabra 

DATOS AUXILIARES: cada carácter de la palahra» palabra al revés 

Fara comprobar si una palatna es un palíndromo, se puede ir fonnando una palabra con los caracteres 
invertidos con respecto a la original y comprobar si ta palabra al revés es igual a 1a original, Para 
obfener esa palabra al revés, se leerán en sentido inverso los caracteres de la patabra inicial y se iián 
juntando sucesivamente basta llegar al primer carácter 

Diseno del algoritmo 
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h 12. Escribìr un algoritmo para determinar el máximo común dìvisor de dos números enteros por el 
aîgoritmo de Euciides , 

Análisis det problema 

DATOS DE SALIDA: máximo común divisor (mcd) 

DATOS DE ENTRADÀ: dos números enteros (a ýb) 

DATOS AUXILIARES: resto 

Para hallar el máximo común divisor de dos números se debe dividir uno entre otro. Si la división es 
exacta, es decir si el resto es 0, el maximo conrôn divisor es el divisor. Si no s se deben dividir otra vez 
los números, pero en este caso el dividendo será eí antiguo divisor y el divisor el resto de la división 
anteríor, E1 proceso se repetirá hasta que la división sea exacta. 

Para diseûar el algorítmo se debe crear un bucìe que se repita mientras que la división no sea 
exacta. Dentro del bucle se asignarán nuevos valores al dividendo y al divisor. 


Diseno del algoritmo 


ìmcio 

leer (a,b) 

mientras a mod b <> 0 
resto a mod b 
a b 
b «- resto 
mcd b 
escrîbir (mcd) 
f in 


1*13 . Disenar un algoritmo que iea e imprima una serie de números distintos de cero , El algoritmo 
debe termînar con un valor cero que no se debe imprimir Finalmente se desea obtener ia 
cantidad de vaïores îeîdos distintos de 0. 

Análìsìs del probtema 

DATOS DÉ ENTRADA: los dístintos números (ndm) 

DATOS DE SALIDA: los mismos números menos et 0 ? ia cantidad de números (contador) 

Se deben leer números dentro de un bucle que terminará cuando el último número leído sea ceio. Cada 
vez que se ejecute dicho bucle y antes que se lea el siguiente número se imprime éste y se incrementa el 
contador en una unidad. Una vez se haya satido del bucle se debe escribir la cantidad de números 
leídos, es decìr, el contador 
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Diseno del algoritmo 



1 tr>crementar I 
contador en 1 1 

I 1 

rtrj 
/ ^ / 




L14* Disenar un algoritmo que ìmprìma y sume ïa serie de números 3 t 6 f 9, 12 f .„,99* 

Análisis delproblema 

Se trata de idear un método con el que obtengamos dicha serie, qué no es más que ùicrementar una 
variable de tres en tres. Para ello se hará un bucle que se acabe cuando el número sea mayor que 99 (o 
cuando se realice 33 veces)* Dentro de ese bucte se incrementa la variable, se imprime y se acumula su 
valor en otra variable llamada suma, que será el dato de salida. 

No tendremos por tanto ninguna variable de entrada, y sí dos de salida ? la que nos va sacando los 
números de tres en tres (núm) y suma. 
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Diseno del algoritmo 


inicio 

suma û 
núm 3 

mientras núm <= 99 hacer 
escribir (núm) 
suma «- suma + num 
núm «- núm + 3 
escribir (suma) 
f in 


1.15. Escrîbir un algoritmo que iea cuatro números v; a contìnuación, escrìba el mayor de los cuatro. 


Análìsis del probìema 

DATOS DE SALIDA: mayor (el mayor de los cuatro números) 

DATOS DE ENTRADA: a ? b, c, d (los números que leemos por teclado) ^ 

Hay que comparar los cuatro números, pero no hay necesidad de compararlos todos con todos* Por 
ejemplo, si a es mayor que b y a es mayor que c s es evidente que ni b ni c son los mayores, por lo que si 
a es mayor que d el número mayor será a y en caso contrario lo será d. 


Diseho del algoritmo 










20 


Fundamantos deProgramación, ií bro de Probtemas 


1,16, Disenar un algoritmo para calcular ia velocïdad (en metrosfsegundo) de hs corredores de una 
carrera de 1500 metros. La entrada serán parejas de números (niimitos, segundos) que darán el 
tiempo de cada corredor. Por cada corredor se imprimirá el tiempo en minutos y segundos, así 
como la veìocidad media , Ei bucîe se ejecutará hasta que demos una entrada de 0,0 que será îa 
marca de fin de entrada de datos. 

Análìsìs del problema 

DATOS DE SALIDA: v {velocidad media) 

DATQS DE ENTRADA: rtïïn,ss (minutos y segundos) 

DATOS AUXILIARES: distancia (distancia recorrida, que en el ejemplo es de 1500 metros) y 

t i empo (los minutos y los segundos que ha tardado en recorrerla) 

Se debe efectuar un bucle que se ejecute hasta que mm sea 0 y ss sea 0, Dentro del bucle se calcula el 

tiempo en segundos con la fórmula tiempo - ss + mm * 60, La velocidad se hallará con la fórmula 

velocidad = distancia /tiempo. 


Diseno del algoritmo 

inicio 

distancìa *- 1500 
leer (nim, ss) 

mientras mm - 0 y s s - 0 hacer 
tiempo ss +■ mm * 60 
v *- distancìa / tiempo 
escribir (mm, ss , v) 
leer (mm,ss) 

f ín 


1.17* Disehar un aigorìtmo para determinar si un nûmero n es primo. (un número primo sólo es 
divisible por el mìsmo y por la unidad). 


Ânâlisis del problema 


DATOS DE SALIDA: E1 mensaje que nos indica sì es o no primo 

DATOS DE ENTRADA: n 

DATOS AUXILIARES: divisor (es el número por el que vamos a dividir n para averiguar si es 

primo) 


Una forma de averiguar si un número es primo es por tanteo. Pam ello se divide sucesivamente el 
número por los números comprendídos entre 2 y n. Si antes de llegar a n encuentra un divisor exactû, 
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el nùmero no será prìmo. Si el prîmer divisor es n el numero será primo* 

Por lo tanto se hara tm bucle en el que una variable (dìvìsor) írá mcrementándose en una 
unidad entre 2 y n. E1 bucle se ejecutará hasta que se encuentra un divìsor, es decîr hasta que n mod 
divisor ï= 0, Si al salir del bucle divisor ^ n, el número será primo. 


Diseno det algoritmo 



L18. Escribir un algoritmo que cùicuîe îa mperficìe de un trîánguh en jìtnción de la base y la 
aitura. 

Anátìsìs del problema 

DATOS DE SALIDA; s (supfârficìe) 

DATOS DE ENTRADA: b (base)> a (altura) 

Para calcular la superfícìe se aplìca la fôrmula S = base * altura /2. 




22 Fundamentos de Programación. Libro de Problemas 


Diseno del algoritmo 


inicio 

leer (b,a} 
s b * ' a / 2 
escribir (s) 
fìn 




La resolución de problemas 
con computadoras y las 

herramientas de 
programación 


2.1. Herramientas de programación 

Un algoritmo puede ser escrito en castellano narrativo ? pero esta descripción suele ser demasiado pro- 
lija y, además, ambigua. Para representar un algoritmo se debe utilizar algun método que permita inde- 
pendizar dicho algoritmo de los lenguajes de programación y, al mismo tiempo, conseguir que sea 
fácilmente codìfícable. 

Los métodos más usuales para la representación de algoritmos son: 

A. Diagrama de flujo 

B. Diagrama N-S (Nassi-Schneiderman) 

C. Pseudocódigo 


23 
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2.2. Diagrama de flujo 

Los Hìa gramas de flujo se utilizan tanto para la representación gráfica de las operaciones ejecutadas 
sobré losdatos através de todas las partes deun sistema de procesamieirto de infoimacián, diagrama de 
flujo del sistema, como para la representación de la secuencía de pasos necesarios para describir un 
procedimiento particular, diagrama de fiujo de detalle. 

En la actualidad se sìguen usando los diagramas de flujo del sistema, pero ha decaído el uso de los 
diagramas de flujo de detalle at aparecer otros métodos de disefio estructurado más efìcaces para la 
representación y actualización de los algoritmos. 

Los diagramas de flujo de detalle son, no obstante, uno de nuestros objetivos prioritarios y, a partir 
de ahora, los denominaremos simplemente diagramas de fluja 

Et diagrama de flujo ufiliza unoá símbolos normálizados, con los pasos det aígoritmo escritos en el 
símbolo adecuado y los símbolos unidos por flécbas, denominadas tfneas de flujo, que indican el orden 
en que los pasos deben ser ejecutados. Los símbolos principales son: 

Símbolo Función 



Inicîo y fin det àlgpritmo 
Proceso 

Entrada/Salida 

Decisîón 

Comerrtario 


Resulta necesarìo indicar dentro de tos símbotos la operaçión específica concebìda por el progra- 
mador. Como ejemplo veamos un diagrama de flujo básico, que representa ta secuencia de pasos nece- 
saria para que un programa lea una temperatura en grados Centígrados y catcule y escriba su valor en 
grados Kelvin. 
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2.3. Dìagramâ Nassi-Schneiderman 

Los dìagramas Nassì-Schneidetman, deínóminados así por sus inventùres, o también N-S, o de Chapín 
son una herramienta de programación que favorece la programación estructurada y reúne característi- 
cas gráficas propias de diagramas de flujo y iinguísticas propias de los pseudocódigos. Constan de una 
serie de cajas contìguas que se leerán siempre de arriba-abajo y se documentarán de la foima adecuada. 

En los díagramas N-S ïas ties estructuras básìcas de la programación estfucturada, secuenciales, 
selectivas y repetitivas ? encuentran su representacíón propia. La prograntación estuctufada será tratada 
en capítulos posteriores. 


Símbolo Tipo de estructura 



E1 algoritmo que lee una temperatnra en grados Celsius y calcula y escribe su valor en grados 
Kelvin se puede representar mediante el siguìente diagrama N-S: 


ínído 

1e9r(ceîs1us) 

kelvin ^ 05lsíus + £73.15 

e$ortbír (kôlvtn) 

fin 


2.4. Pseudocódigo 


Ê1 pseudocódigo es un lenguaje de especificación de aìgorittnos que utiliza palabras reservadas y exige 
la indentacìón, o sea sangría en el rnargen izquìerdo, de algunas líneas. Eu nuestros pseudocódigos 
usaremos determinadas palabras en espanol como palabras reservadas. 

E1 pseudocódigo se concibió para superar las dos príncipales desventajas del diagrama de flujo: 
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lento de crear y dificil de modificar sin un nuevo redibujo, Es una lierramienta muy buena para el 
seguimiento de la lógica de un algoritmo y para transformar con facilidad los algoritmos a programas, 
escritos en un lenguaje de programación especifico. En este libro se escribirán casi todos los algoritmos 
en pseudocódigo. 

E1 pseudocódigo comenzará siempre con la palabra lnicio y terminará con la palabra fin. 
Cuando se coloque un comentario de una sola línea se escribirá precedido de //. Si el comentano es 
multilínea, lo pondremos entre {}. Para ìntroducir un valor o serie de valores desde el dispositivo 
estándar y almacenarlos en una o varias variables utilizaremos 1 ee r(<Usta_de_variables >) , 

Con <nombre_âe_variable> «- <expresión> almacenaremos en una variable el resultado de 
evaluar una expresión, Hay que tener en cuenta que una única constante, variable o función, constitu- 
yen una expresión. 

Para imprimir en el dispositivo estándar de salida una o varias expresiones emplearemos 
e sc r ibir (<lista_de_exp resíones>) 

Las distintas estructuras se representarán de la siguiente forma: 


Decisión simpie: 


Decisión dobìe: 


Decìsiôn múltiple: 


sì <conâîción> entonces 
<accionesl> 

fin_si 

si <condición> entonces 
<acci onesl> 

si_no 

<acciones2> 

fin_si 

segun_sea <expresión_orâinal> hacer 

< 1 i sta_de__valores_orâinales > : <accionesl> 


[ei_no // E1 corchete ìndica opcionalìdad 

<accionesN>] 

fin_según 

Repetitivas: mìent ras < condi cì ân> hacer 

<acciones> 

f in_mientras 
repetir 

<acciones> 

hasta_gue <condición> 

desde <variable><^< v_inicial> hasta <v_final> 

[incremento I decremento <increnìento>] hacer 
<acciones> 


fìn desde 
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inlcìo, f in, leer, escribir y las palabras que aparecen en negrita en las distintas estmc- 
turas se consíderan palabras reservadas y no deberán utilízarse en su lugar otras similares. 

E1 ejemplo ya citado que transforma grados Celsius en Relvin, escrito en pseudocódigo quedaría 
de la siguiente fonna: 

inicio 

leor (celsius ) 

kelvìn celsius + 273.15 
eacribir {Kelvín) 
fin 


2.5. Ejercìcíos resueltos 


2A. i Cuàl de los siguientes datos son vâlidos para procesar por una computadora? 

a) 3.14159 e) 2.234E2 i) 12.5E.3 

b) 0.0014 J) 12E+6 j) J23E4 

c) 12345.0 g) 1.1E-3 k) 5A4.14 

d) 15.0E-04 h) J5E-0.4 í) A1.E04 


Serían válidos los datos a, b, c, d, e, f, g yj, Los datos h e i no serían válidos pues el exponente no puede 
tener forma decimal. E1 k, no sería correcto pues mezcla caracteres alfabéticos y dígitos ? y no se puede 
considerar una identificador de una variable ya que empieza por un dígito. E1 dato 1 aunque mezcla 
dígìtos y caracteres alfabéticos, podría ser un identíficador, si admitiéramos el carácter punto como 
carácter válido para una variable (PASCAL o BASIC lo consideran). 


2*2. ^Cuál de los siguientes identìjìcadores son vâlìdos? 

a) Renta e) Dos Pulgadas i) 4À2D2 

b) Âlquìîer j) C3PO j) î3Nombre 

c) Constante g) Bienvenido#5 k) Nom bre_A pell ìdos 

d) Tom s h) elemento l) NombreA pellidos 


Se consideran correctos los identificadores a ? b ? c, f, h, k y 1. E1 d no se considera correcto pues incluye 
el apóstrofo que no es un carácter válido en un identificador. Lo mismo ocurre con el e y el espacio en 
blanco, y el g con el carácter #. E1 í y el j no serían válidos al no comenzar por un carácter alfabético. 

2*3 t Escribir un algoritmo que lea un vaîor entero f lo doble, se multiplique por 25 y visuaîice et 
resultado. 



28 Fundamftntosde Programadórr. LibrodeProtóemas 


Anáfísis âe probfema 

DATOSDESALIDA; resultado fes el resultado de reaiizar las Operaciones) 

DATOS DE ENTRADA: número (el número qvte leemos por teclado) 

Leemos el número por teclado y to multiplicamos por 2, metiendo el contenido en la propia variable de 
entrada. A continuación lo muttiplicamos por 25 y ásìgnamos el resultado a la variabie de salida 
resultado. También podríamos asignar a la variable de salida directamen.te la expresión 
numero*2*25. 


Diseno del algoritmo: 

algoritmo ejercicic_2_3 

entero : número, resultado 

lnicio 

leer (número) 
número «- número * 2 
resultado «- número * 25 
eacribir ; result ado ) 
fin 

2.4. Disenar un algoritmo qite lea cuatro variabîes y caîcule e imprima su proàueto, su suma y su 
medìa arìtmétìca. 


Análisis del problema 

DATOS DE SALIDA: producto, suma y media 

DATOS DE ENTRADA: a.b.c.d 

Después de leer los cuatro datos. asignamos a la variable producto la muitipiicación de las cuatro 
variabies de entrada. A la variable suma ie asignamos su suma y a ia variable medía asignamos el 
resultado de sumai las cuatro variables y dìvidirlas entre cuatro. Como et operador suma tiene menos 
prioridad que el operador división, la será necesario encerrar la suma entre paréntesis. También podría- 
mos haber dividido directamente te variable suma entre cuatro. 

La variables a,b,c, d, producto y suma podrán sct enteras, no así lavariabte rrtedia, ya 
que la división produce siempre resultados de ttpo real. 


Diseito del algoritmo 

algoritmo e j ercicio_2 4 

entero; a, b, c f d, producto, sum-a 



La resoîución de probtemas con computadoras y [as herramíentas de programacion 29 


real: media 
inicio 

leer [a r b f c t dï 
producto -í-a*b*c*d 
suma «-a + b + 'c + d 
media (a + b + c + d) /4 
escriblr (producto, suma, mediaj: 
fin 


2.5. Dtsenar im programa que iea el peso de un hombre en libras y nos demeha su peso en Hlogra- 
mos y gramos (Noîa: una libra eqinvaîe a ÙÀ53592 Hbgramos) 

Ânátìsîs det problema 

DATOS DE SALIDA: kg, gr 

DÀTOS DE ENTRADA: pe s o 

DATOS AUXILIARES: líbra (los kiIogramos que equivalen a una libra) 

E1 dato auxiliar libra lo vamos a considerar como m m comstante, pues no variará a ío íargo del 
programa. Primero leemos el peso. Para hallar stì equivaïemcïa en írilogramos multìplìcamos éste por la 
constante lihra. Para hallar el peso en gramos multìpíieainos los kilogramos entre mit, Como es posible 
que el dato de entrada no sea exacto* consideraiemos todas las variables como reales. 


Diseno dei aïgoritmo 

algoritino ejércicio_2_5 

constante 1 ibra = û . 4 5 3 592 
real ; peso, kg, gr 

inicio 

leer {peso) 

kg +- peso- * libra 

gr <- kg * 10QÛ 

eecribir ( f Peso en ki iogramos. ; J , kgï 
escrìbir ('Peso en gramos : J r gr> 

fin 

2.6. Sì Á=6, B=2y C=3, encontrar tos vaîores de tas sîguientes expresiones: 

d)A*BmodÇ 
e}Â+BmàdC 
fyÂ divB rfrv C 


a) Â-B+C 

b) À*BdfrC 

c) ÂdfoB + C 
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Los resultados serían: 

a) (6-2)+3 = 7 

b) (6*2) div 3 = 4 

c) (6 div 2)+3 = 6 

d) (6*2) raod 3 = 0 

e) 6+(2 raod 3) = 8 

f) (6 div 2) div 3 = 1 

2. 7. iQuê se obtiene en las variabïes A y B después de la ejecución de las siguientes instmccìones? 

A<-5 
B *-A + 6 
A<-A + l 
B -f-A - 5 

Las variables irían tomando los siguientes valores: 

A «- 5 , A = 5, B indetenninado 

Bs-A + 6 , A = 5,B = 5 + 6= 11 

As-A+l , A = 5+1=6,B = 11 

Bf-A-5 , A = 6, B = 6- 5 = l 

Los valores fmales serían: A = 6 y B = 1. 

2.8. iQuè se obtiene en las variables A, B y C despuês de ejecutar las siguientes instruccìones? 

A *- 3 
B «- 20 
C ■<— A + B 
B <— A + B 
A 

Las variables tomarían sucesivamente los valores: 

A<-3 ,A = 3, ByC indeterminados 

B «- 20 , A = 3, B y' 2(X C indeterminado 

Cs-A + B , A = 3, B ^ 20, C = 3 + 20 = 23 

B <- A + B , A = 3, B = v 3 + 20 = 23, C = 23 

A B , A = 23,B = 23,C = 23 
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Los valores de las variables serían: A = 23, B = 23 y C = 23. 


2.9. iQue valor toman las variables A y B tras la ejecución de las siguientes asignaciones? 

A <- 10 
B <- 5 

A<-B ' 

B <- A 

E1 resultado sería el siguìente: 

A *- 10 , A= 10, B indeterminada 
B 5 , A = 10, B = 5 

A«-B ,A = 5, B = 5 
B«-A , A = 5, B = 5 
con lo que A y B tomarían el valor 5. 

2.10. Escrihir las sìgti'ientés expresiones én forma de expresiones áìgorítrriieas 


, M „ 

a) iv + 4 


b) M .+ 


N 


P-Q 


c) 


sen x + cos y 
tan x 


p N 

d) .E±Jí ... e ) — — ^ + 

P ~Q o- r - 2a 

y 5 

a) M / N + 4 .;... 

b) M - 'N / Í?-Q) 

c) (sen(X) + cos (X) ; / tan-X} ; . : 

d) (M + N) / (P - Q) 

e) (M + N / P) / (Q - R ./' 5). 

f) ( ( — B) + raíz2 (BE2-4*A*C) ) / (2*A) 


2.11. Se tienen tres variables A, B y C. Escribir las instrucciones necesarias para intercambìar entre 
sí sus valores del modo siguiente: 

B toma el valor de A 

4oma el valor de B 


A ioma el valor de C 
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NOtet^sólo se debe utilizar una vùriabte auxilìar qae llamaremos AUX, 


■ '■ ÂUX A ■■■ " " 

A - C 

C *- B 

5 AUX 

2.12. Deducìr ios resultados que se obtienen del siguiente algorìtmo: 

algori tmo e j e rc i c io_2_l 2 
entaro: X, Y, Z 
ìnicio 

X - 15 ■ 

Y *- 30 

2 - Y - X ' ■'' : 

escrìbir (X,Y) ■■ H 

escribir (z) 
f in 

Para analizar los resultados de un algoritmo, lo mejor es utilizar una tabla.de. seguimieîito, Çn Ja;tabla 
de seguimiento aparecen varias coluirmas, cada una con el nombre de una de las variables que aparecen 
en el algorìtmo, pudiéndose incluir además una con la salida.de! algoritmo. Más abajo se ya realizando 
el seguimiento del algorìtmo reilenando la columna de cada variable con el valor que ésta va tomando. 


X 

Y 

Z 

Sàlida 

15 

30 

15 





15,30 




15 


2.13. Encontrar ei valor de la variable VALOR después de îa ejecucion de las siguientes operaciones 

a) VALOR -4.0*5 ' ■ ■■■■ ■ 

b) X- 3.0 

Y -2.0 ■ ;■■ 

VALOR -X'Y- Y , ; , u .. ... ( . . ■ ; .. v . v 

c) VALOR -5 

X-3 ' ' '■ ; ; 

VALOR — VALOR * X 

Los resultados serían: 

a) VALOR= 20,0 
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b) VALOR 

c) VALOR = 15 

Nótese que en los casos a) y b), valor tendrá un contenido de tipo real, ya que alguno de los operandos 
son de tipo real. 

2.14. Determìnar los valores de À f B f C y D después de la ejecución de ìas sìguìentes instruccìones: 

algoritmo ejercicio_2_14 
var 

entero: A, B t C, D 
inìcio 
A <- 1 

B - 4 ' 

■ C ■+- .A + B ^ . f J ■ 

D A - B 

A C + 2 * B 

B <- C +.B 

C <- A * B ' 

D ■«— B + D 

A <- D +■ C 

• àí . C . >■ '&■■ etttonees 

C ■<— Â - D I :■■'■ ■ i 

ei_no i 

, ; .'.C f 'B. - .'.D, ■, ■ ... . ; . ... 

■' fin_ei ' i ' ."! "í ' ' ;■ .'"■ 

■ fin ■■ -■'■ ■ ■' í -' ,i -'- í ' - 

Realizaremos una tabla de seguimiento: 


A 

B 

C 

D 

1 

4 

5 

-3 

13 

9 

117 

6 

123 


117 



con lo que A - 123, B = 9 ? C=117yD = 6 

2.15 , Escribir un algorìtmo que caícuîe y escrìba el cuadrado de 821, 


Análîsis del problema 


DATOS DE SALÏDA: 
DATOSDEENTRADA: 


cuadr (almacenará el cuadrado de 821) 
el propio número 821 
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Lo uníco que hará este algorítmo será asignar a la variable cuadr el cuadradò de 821, es decir, 821 * 
821 


Diseno del aigoritmo 

algoritmo ejercicio_2_15 
entero : cuadr 

iaicio 

cuadr 821 * 821 

eecr ibi r ( c uad r ) 
f in 


2J6 , Realìzar un algorìtmo que calcule la suma de los enteros enîre 1 y 10, es decìr l+2+3+^+10 


Análisis del problema 

DATOS DE SALIDA: suma (contìene la suma requerida) 

DATOS AUXILIARES: núm (será una variable que vaya tomando valores entre 1 y 10 y se acumu- 

laráen suma) 

Hay que ejecutar un bucle que se realice 10 veces. En él se ira incrementando en 1 la varìable núm, y 
se acumulará su valor en la variable suma, Una vez salgamos del bucle se visualizará el valor de la 
variable suma. 


Diseno del algoritmo 
TABLA DE VARIABLES: 


entero : suma, num 
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2.1 7. Realizar un algoritmo que caïcule y visualice las potencìas de 2 entre 0 y 10. 

Análisis del problema 

Hay que implementar un bucle qúe se ejecute once veces y dentro de él îr incrementando una variable 
que tome valores entre 0 y 10 y quese llamará r.ir.. También dentro de él se visualizará el resultado de 
la operación 2 . A ..núm. 

Disefio del algorítmo 

TABLA DE VARIABLES: 


entero : n'úm 
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2A8* Leer un carácier y deducìr si estâ situado antes o despuês de la «m» en orden alfabêtico. 


Anátísìs del probtema 

Como dato de salida está el mensaje qiie nos dice ta situacíôn del carácter con rêspéctoa îa «m». Como 
entxada el propio carácter que introducimos por teciado. No se necesita ninguna variable atixriîar: 

Se debe leer el carácter y comparario con la «m» para ver si es mayor T menor o igual que ésta* 
Recuerde que para el ordenador también un carácter puede ser mayor o menor que otro, y 1 q hace 
comparando el codigo de los dos eiementos de la comparación. 


Dtseno del algoritmo 
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2,19, Leer dos caracteres y âeâucìr si están en oràen aìfabêtico, 

Análisîs deí problema 

DATOS DH SALÏDA: E1 mensaje que nos mdica si están en orden alfabético 

DATOS DE ENTRADÀ: A y B (los caracteres que introducimos por teclado 

Se deben leer los dos caracteres y compararlos, Si A es mayor que B s no se habrán introducido en orden. 
En caso contrario estarán en orden o serán iguales. 


Diseno del algoritmo 

algoritmo e j ercicio_2_19 

caxácter: a, b .. 

inicio 

leer (a,b) 

ei a < b entonces 

escribir { ' están en orden ' ) 

si_.no 

si a = b entonceB 

eecribir { ' son ignales ' ) 

ei_no 

eecribir (*no' están eri ordenb 

fin_sl 
fin_ei 
f in 


2,20, Leer un carâcter y deducir si estâ o no comprendido entre ias letras I y M ambas inchisive. 


Análisis deí probtema 

DATOS DE SALIDA: E1 mensaje 

DATOS DE ENTRADA: Eî carácter 

Se lee el carácter y se comprueba si está comprendido entre ambas letras con los operadores >= y <=. 


Diseho det aigoritmo 

elgoritmo Bjercicio_2._2Û' 

carácter : c 

iniclo 
leer { c ) 
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si (c >= 'i') y íc <= 'M J ) entonces 
escribir { J Está entre la I y la M J ) 
si_no 

escribir ( 'no se encuentra en ese rango ' ) 

f in_si 
fin 




Estructura general de un 
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3.1. Escritura de algoritmos 

En la escritura de algoritmos se hará necesario el uso de alguna herramienta de programación, La más 
adecuada es el pseudocódigo, y debe quedar todo lo más claro posiblej de modo que se facilite al 
máximo su posterior codifìcación en un lenguaje de programación. 

A1 escribir un algoritmo deberemos considerar las siguientes partes: 

* La cabecera 

* E1 cuerpo del algoritmo* 

La cabecera contiene el nombre del algoritmo completo precedido por ïa palabra algoritmo. 

E1 cuerpo del algoritmo contiene a su vez otras dos secciones: el bloque de declaraciones y ei 
bloque de instrucciones. En el bloque de declaraciones se definen o declaran las constantes con nombre, 
los tipos de datos definidos por el usuario y también las variables. Se recomienda seguir este orden* 
Para declarar las constantes con nombre el formato será 
const 

<noirìbre_de constan£el> - <valorl> 


La declaración de tipos suele realizarse en base a los tipos estándar o a otros defmidos previamen- 
te, aunque también hay que considerar el método dírecto de enumeración de los valores constituyentes. 
Todo esto se comentara con más detalle en capítulos posteriores. 
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A1 declarar las variable&tendremos que listar sus nombres y especificar sus tipos, lo que haremos 
de la siguiente forma: 
var 

<típo_de_datol > : <lista_de_variables> 

E1 bloque de instruccíones contiene las acciones a ejecutar para la obtencìón de los resultados, Las 
instrucciones o acciones básicas a coiocar en este bloque se podrían clasificar del siguiente modo: 

* de inicio/fìn. La primera instrucción de este bloque será siempre la de inícío y la última la de 
fin. 

* de asignación. Esta instrucción permite almacenar en una variable el resultado de evaluar una 
expresión, perdiéndose cualquier otro valor previo que la variable pudiera tener. Su formato es: 

<no/îibre_de_variajbl e> +- <expresión> 

Una expresión puede estar formada por una única constante, variable o función. La variabie que 
recibe el valor final de la expresión puede intervenir en la misma, con lo que se da origen a 
contadores y acumuladores. 

* de lectura. Toma uno o varios valores desde un dispositivo de entrada y los almacena en memo- 
ria en las variables que aparecen listadas en la propia instrucción. Cuando ei dispositivo sea ei 
dispositivo estándar de entrada, escribiremos: 

leer ( <lista_de_varíables>) 

* de escrítura. Envía datos a un dispositivo. Cuando los datos los enviemos al dispositivo estandar 
el formato para la instrucción será: 

escribir (<lista_de_expresiones>) 

* de bifurcación. Estas instruccíones no realizan trabajo efectìvo alguno, pero penniten controlar 
el que se ejecuten o no otras instrucciones, así como alterar el orden en el que las acciones son 
ejecutadas* Las bifurcaciones en el flujo de un programa se realizarán de modo condicional, esto 
es en función del resultado de la evaluación de una condición. 

E1 desarrollo lineal de un programa se interrumpe con este típo de instruccìones y, segun el 
punto a donde se bifurca, podrcmos clasificarlas en bifUrcaciones hacia adelante o hacia atrás* 
Las representaremos mediante estructuras selectivas o repetitivas. 

Ademas, resulta recomendable que los algoritmos lleven comentarios. 


3.2. Contadores, acumuladores e interruptores 

Entre las variables que utilizan los algorittnos merecen una especial mención contadores, acumulado- 
res e interruptores. 

3.2. 7 . Contadores 

Un contador es una variable cuyo valor se incrementa o decrementa en una cantidad constante cada vez 
que se produce un determinado suceso o acción, Los oontadores se utilizan en las estructuras repetitivas 
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con la finalìdad de contar sticesos o acciones intemas del bucle. 

Con los contadores deberemos realizar una operación de tnicialìzación y, posteriormentej las 
sucesivas de incremento o decremento del contador. 

La inicialización consiste en asignarle al contador un valon Se situará antes y fuera det bucle* 
<noitibre_âel_contador> «- <valor_de_inicíalización> 

En cuanto a los incrementos o decremenlos del contador, puesto que la operación de asignación 
admite que ta variable que recibe el valor final de una expresión intervenga en la mtsma, se realizarán 
a íravés de este tipo de instrucciones de asignación ? de la siguiente foima: 

<nombre_del_contador> <nombre_del_contador> + <valor_constante> 

dicho <valor_constante> podrá scr positivo o negativo. Esta instruccìón se colocará en el inte- 
rior del bucle. 

32.2. Acumuladorss 

Son variables cuyo valor se incrementa o decrementa en una cantidad variable. Necesitan operaciones 
de: 

■ Inicialización 

<nombre_acumulador> +- <valor_de_inicializacìón> 

• Acumulación 

<nombre_acumulador> *- <nombre_acumulador> + <nombre_variable> 

Hay que tener en cuenta que ta siguieute también sería una operacion de acumulación: 

<no/njbre_acLîiîîulâder> <nambre_acumulador> * <valor> 


3.2.3 . ínterruptores 

Un interruptor, bandera o $wìtch es una variable que puede tomar los valores verdad y f also a Io 
laigo de Ia ejecución de un programa, comunicando así información de una parte a otra del mismo. 
Pueden ser utilìzados para el control de bucles. 


3.3. Estilo recomendado para la escritura de algoritmos 

Coxno se dijo anteriormente, la heiramienta de escritura de algoritmos más adecuada es el pseudocódigo. 
Con el empleo del pseudocódigo los algoritmos deberán presentar el siguiente aspecto: 

algoritmo <jjoinjbre_algori tiiîo> 

const 

<iiomjbre_de_eonstajitel> = valorl 


var 

<tipo_de_datol>: <nombre_de_variablel> [ f <nombre_de_variable2> f ] 
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/ /Los datos han'de ser declarados antes .de poder ser . ntílizados 

inicio 

<acciónl> 

<accîón2> ' 

//Se ntilizará siempre la sangría en las estructuras sel.ectivas y 
/ /repetitivas . 


<acci ónN> 

fin 


3.4. Ejercieios resueltos 

3.1. Se desea calcular independientemente la suma de los números pares en impares çomprendìdos 
entre 1 y 200 , 

Análisis del problema 


E1 algoritmo no necesitaría ninguna variable de entradaj ya que no se le proporciona ningún valor. 
Como dato de salida se tendrán dos variables (sumapar y sumaìmpar) que contendrían los dos 
valores pedidos. Se necesitará también una varìable auxiliar (contador) que irá tomando valores 
entre 1 y 200. 

Después de inicializar el contador y los acuiríuladorès' comienza un bucle que se ejecuta 200 
veces. En ese bucle se controla si el contador es par o impar, comprobarido si es divisìble por dos con el 
operador mod, e incrementando uno u otro acumulador. 


Diseito del algoritmo 

algoritmo ej_3„ 1 
var 

entero : contador, sumapar ; sumaìmpar 

inicio 

contador ^ 0 ;■ ■ ■ . 

sumapar — 0 
sumaimpar — 0 

repetir ■ 

contador. — . contador + -l- 
si contador mod 2 = 0 entoncee 
sumapar «- sumapar + contador 

ei__no 

sumaimpar «- sumaimpar + contador 

fin_si 
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hasta_que contador = 200 
escribir ( sumapar , suïnaimpar } 

fin 


3,2, Leer una serie âe números enteros posìtivos distìnios de 0 (el ùltimo nûmero de la serie debe ser 
el -99) obtener el nùmero mayor 

Análisìs del problema 

DATOS DE SALIDA: máx (el númercj mayor de la serie) 

DATOS DE ENTRADA: núin (cada uno de lòs números que introducimos) 

Después de leer un número e inicializar máx a ese número, se ejecutará un bucle mientras el último 
número leído sea distinto de -99 + Dentro del bucle se debe controlar que el numero sea distinto de 0. Si 
el número es 0 se vuelve a leer hasta que la condición sea falsa, También hay que comprobar si el último 
número leído sea mayor que el máximo, en cuyo caso el nuevo máximo será el propio número* 


Diseno del algoritmo 

TABLA DE VARJABLES: 
entero : máx, núm 
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3, 3, Calcular y vìsualìzar la suma y el producto de los números pares comprendidos entre 20 y 400, 

ambos inclusìve. 


Análisis del problema 

DATOS DE SALIDA: suma, producto 

DATOS AUXILIARES: contador 

Para solucionar el algoritmo, se deben ìnicializar los acumuladores suraa y producto a 0 y la varìa- 
ble contador a 20 (puesto qúe se desea empezar desde 20) e implementar un bucle que se ejecute 
hasta que la variable contador valga 200. Dentro del bucle se ìrán ìncrementando los acumuladores 
suma y producto con las siguientes expresiones: suma *“ suma+contador y producto 
producto*contador. Una vez realizadas las operaciones se debe ìncrementar el contador. Como se 
desea utilìzar sólo los números pares, se usará una expresiòn como contador *- contador+2 . 
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Diseno del algoritmo 

TABLA DE VARÍABLES: 

entero : contador, suma,producto 



3.4. Leer 500 números enteros y obtener cuántos son positivos. 

Análisis del problema 

DATOS DE SALIDA: positivos (contiene la cantìdaa de números posìtivos ìntroducidos) 

DATOS DE ENTRADA: núrr. (los htuneros que mtroducimos) 

DATOS AUXÏLIARES: ' Oor.ta (se encatga de contar la cantidad de númefos întrodùcìdos) 

Se ha de hacer un bucle que se ejecute 500 veces, controlado por la variable cont a. Dentro del bucle se 
lee el núniero y eomprobaremos si es mayor que 0, eti cuyo caso se incrementa él contador de positivos 
(positivos). 
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Dîseito del algoritmo 
TABLA DE VARIABLES: 

eatero : posìtívos, núm; conta 



3,5, Se trata de escríbir el aîgoritmo que permîta emìtir la factura corrcspondiente a una compra de 
un articulo determìnado del que se adquieren una o varias unidades. EIIVA a aplimr es del 
12% y si el precio bruto (precio de venta + IVÂ) es mayor de 50.000 pesetas, se aplìcará un 
descuento deî 5%. . 

Análîsîs del problema 

DÁTOS DE S ALED A: bruto (el precio bruto de la compra, con o sin descuento) 

DATOS DE ENTRADA: precio (precio sin rVA), unídades 

DATOS AUXILIARES: neto (precio sin rVA), iva (12% del neto) 

Después de leer el precio del articulo y las unidades compmdas s se calcula el precio neto (precio * 



■■ Estructura general dé un programa 47 : 


unìdades). Se caleula también el IVA(neto * 0 . 12) y el bruto (neto + ìva). Si el bruto es 
mayor que 50.000 pesetas, se le descuenta un 5% (bruto *- bruto * 0.95). 

A1 multiplicar el neto por un valor real (0.12) para obtener el IVA, y calcular el bruto a partir del 
IVA, ambos deben ser datos reales. 


Diseno del algoritmo 

algoritmo e j_3_5 
var 

entero : precio , neto, unidades 

real : iva.bruto 

inicio 

leer (precio, unidades ) 
neto 4- precio * unidades 
íva +- neto * 0.12 
bruto 4 - neto + iva 
ei bruto < 50000 entoncee 
bruto 4- bruto * 0,95 
f in_si 

escribir (bruto) 
fin 


3.6. Caicular la suma de ios cuadrados de los 100 primeros números naturalès 


Anâlisis det problçma 

DATOS DE SALIDA: S'ux.a (acumula los cuadrados del número) . ; 

DATOS AUXILIARES: ■ co.nta (contador que controla las iteraciones del bucle) 

Para realizar este programa es necesario un bucle que se repita 100 veces y que se controlará por la 
variable conta. Dentro de dicho buçle se Ìncrementará el contador y se acumulará el cuadrado del 
contador en la variable suma. 


Disefto del algorìtmo 


TABLA DE VARIABLES: 

entero : suma, conta 
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3, 7, Sumar los números pares del 2 al 100 e ìmprimìr su valor. 


Análisis del problema 

DATOS DE SALIDA: suma (contìene la suma de los números pares) 

DATOS AUXILIARES: conta (contador que va sacando los números pares) 

Se tratade hacerunbucle en el que un contador (conta') vaya incrementando suvalor de dos endos y, 
mediante el acumulador suma, y acumulando los sucesivos valóres de dicho còntadór, E1 contador se 
deberá inicializar a 2 para que se saquen nûmeros pares. E1 bucle se repetirá hasta que conta sea 
mayor que 100. 


Diseno del algoritmo 


TABLA DE VARIABLES: 
entero ï conta, suma. 
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3.8. Sumar 10 números introducidos por teciado; 


Análisis del probtema 

DATOS DE SÀLÏDA: suma (suma de los números) 

DATOS DE ENTRADA: núm (los números que introducimos por teclado) 

DATOS AUXILIARES: conta (contador que controla la cantidad de números introducidos) 

Después de micializar conta y.suma a 0, se debe implementar un bucle que se ejecute 10 veces. En 
dicho bucle se incrementará el contador cpnta en una unida<L se introducirá, por tecìado núiri y se 
acumulará su valor en suma* E1 bucle se ejecutará mientras que conta sea menor o igual que 10. 


Diseno del algoritmo 
TABLA DE VARIABLES 


entero : suma , núm f conta 
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3.9. Calcular la medìa de 50 números introducidos por teclado y visualizar su resuîtado. 

Análìsis det problema 

DATOS DE SALIDA: medìa (contìefle la medîa de los cincuenta números) 

DATOS DE ENTRADA: núm (cada uno de los cincuenta numeros întroducidos por teclado) 

DATOS AUXILIARES: cont a (contador que cóntrola la cantidad de números introducidos), suma 

(acumula el valor de los números) 

Después de ìnicialìzar conta y suma, se realiza un bucle que se repetirá 50 veces. En dicho bucle se 
lee un número (núm), se acumula su valor en suma y se incrementa ei contador conta. E1 bucle se 
repetirá hasta que conta sea igual a 50. Una vez íuera del bucle se calcula la media (suma / 5 0) y 
se escribe el resultado. 


Diseito del algoritmo 


TABLA DE VARIABLES 

entero : núm,conta, suma 
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real : rciedia 



3*10* Visualizar lo$ múlîiplos de 4 comprendidos entre 4 y N t donde N e$ un número ìntroducido por 
teclado. 


Anâlms del problema 

DATOS DE SALÏDA: múltiplo (cada uno de los múltíplos de 4) 

DATOS DE ENTRADA: N (número qué indica hasta que múltiplo vamos a visualìzar) 

DATOS AUXILIARES: conta (contador que servirá para calcular los múltiplos de 4) 

Para obtener los múltiplos de cuatro se pueden utilizar varíos métodos. Un métódo coiisiste en sacar 
números correlativos entre 4 y N y para cada uno comprobar si es múltiplo de 4 mediante el operador 
mod, Otro método sería utilizar un contador que arrancando en 4 se fuera incrementado de 4 en 4, Aquí 
simplemente se irá multiplicando lá constante 4 por el contador, que tomará valores a partir de 1 . 

Para realizar el algoritmo ? después de inicializar conta a 1 y múltîplo a 4 y leer el número de 
múltiplos que se desean visualizar, se debe ejecutar un bucle mientras que múltiplo sea menor que 
N. Dentro del bucle hay que visualizar múltîplo, incrementar el contador en 1 y calcular el nuevo 
múltiplo (4 * conta). 
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Diseno del algoritmo 

TABLA DE VARIABLES 
entero : múltiplo, N, conta 



3JL Realìzar un dìagrama que permita realìzar un contador e ìmprìmìr los 100 primeros números 
enteros. 


Análisis del problema ••••.. 

DATOS DE SALIDA: Los números enteros entre 1 y 100 

DATQS AUXILIARES: conta" (controla el número de veces que se ejecuta el bucìe) 

Sedebeéjecutar unbucîe 100 veces. Dentro del bucle se íncrementà én l el eontador y se visualiza éste : + 
El bucle se èjecutará mientras còntá sea mefior que 100. Previameniè à la realización del bticle P 
conta se inicializará a 0. 
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Diseno del algoritmo 

TABLA DE VARIABLES 
entero : conta 



3*12* Dados 10 números enîeros que introduciremos por teclado t visuaîizar la suma de los numeros 
pares de la lista t cuántos números pares existen y cuài es la media arìtmètica de los nàmeros 
impares . 


Diseno del algoritmo 

DATOS DE SALIDA: spar (suma de pares), npar (cantidad de números pares), media (me- 

día de números impares) 

DATOS DE ENTRADA: num (cada uno de los números iníroducidos por teclado) 

DATOS AUXILIARES: conta (contador que controla la cantidad de números introdncidos), 

simpar (suma de los números ímpares) s nimpar (cantidad de números 
impares) 

Se ha de realizar un bucle 10 veces. En ese bucle se introduce un número y se comprueba si es par 
mediante el operador mod. Sí es par se incrementa eì contador de pares y se acumula su valor en el 
acumulaáor de pares. En caso contrario se realízan las mismas acciones con el contador y el acumula- 
dor de impares, Dentro del bucle también se ha de incrementar el contador conta en una unidad. El 
bucle se realizará hasta que conta sea igual a 10, 

Ya fuera del bucle se calcula la medìa de impares (simpar / nimpar) y se escribe spar, 
npar ymedia. 
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Diseno del algorìtmo 
TABLA DE VARIABLES 

entero : conta, núm, spar f npar, simpar , nimpar 

real : medìa 



3*13* Calcular la nota media por alumno de una clase de a alumnos > Cada alumno podrâ tener un 
número n de notas distinto. 
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Â nálisis del problema 


DATOS DE SALÍDA: 
DATOS DE ENTRADA: 
DATOS AUXILIARES: 


media (media de cada alumno que también utilizaremos para acumular 
las notas) 

a (número de alumnos) ? n (número de notas de cada alumno), nota (nota 

de cada alumno en eada una de las asignaturas) 

contaa (contador de alumnos), contan (contador de notas) 


Para realizar este algoritmo se han de realizar dos buctes anidados. E1 primero se repetìrá tantas veces 
■ como alumnos. E1 bucle intemo se ejecutará por cada alumno tantas veces como notas tenga éste. 

!. En el bucle de los alumnos se lee el número de notas e ínicializai las variables medía y contan 
jj a 0. Aquí comenzará el bucle de las notas en el que leeremos una nota, se acumula en la variable 
\ ^edia y se incrementa el contador de notas. Este bucle se ejecutaráhastaque el contador de notas sea 
igual a n (número de notas). 

I Finalizado el bucle intemo, pero todavía en ei bucle de los alumnos, se calcula la media (me- 
dia / n) s se escribe y se incrementa el contador de alumnos. E1 programa se ejecutará hasta que 
contaa sea igual a a. 


f Diseno deí algoritmo 
\ TABLA DE VARIABLES 

t 

: entero : a, n, contaa, contan 

} real : media, nota 
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Introducción a la 
programación estructurada 


4.1. Programación estructurada 

La programacìón estructurada es un coiijunto de técnicas para desarrollar algoritmos fáciles de escribir, 
veríficar, leer y modificar, La programación estructurada utiliza: 

* úiseûo descendente. Consiste en disenar ios algoritmos en etapas, yendo de los conceptos gene- 
rales a los de detalle. E1 diseiïo descendente se verá completado y ampliado con el modular. 

* recursos abstractos. En cada descomposición de una acción compleja se supone que todas las 
partes resultantes están ya resueltas, posponiendo su realización para el siguiente refinamiento, 

* estructuras básicas. Los algoritmos deberán ser escritos utiìizando únicamente tres tipos de 
estructuras básicas. 

4.2. Teorema de Bôhm y Jacopini 

Para que la programación sea estructurada, los programas han de ser propios, Un programa se defme 
como propio si cumple las siguientes características: 

* tiene un solo punto de entrada y uno de salida. 

* toda acción del algoritmo es accesìble, es decir, existe al menos un camino que va desde el inicio 
hasta el fin del algoritmo, se puede seguir y pasa a través de dicha acción. 

* no posee lazos o bucles infmitos. 

Ei teorema de Bòhm y Jacopini dice que: «un programa propîo puede ser escrito utilizando 
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únìcamente tres tìpos de estructuras: secuenciaL selectiva y repetitîvà». 

De este teorema se deduce que se han de disenar los algoritmos empleando exclusivamente dìchas 
estructuraSj la cuales, como tienen un único punto de entrada y un único punto de salida, harán que 
nuestros programas sean propios. 


4.3. Estructuras de control 

A las estructuras secuencial, selectiva y repetitiva se las denomina estructuras de control debido a que 
controlan el modo de ejecución del programa, 

4.3.1. Estructuras secuenciales 

Se caracterizan porqué una acción se ejecuta detrás de otra. E1 flujò del programa coincide con el orden 
fïsico en el que se han ido poniendo las iiistrucciones, 

Diagrama de flujo Dîagrama N-S Pse u docódig o 


acción 1 


acción 2 


acciòn n 


acción 1 
acción 2 
aoción n 


acción 1 
accìón 2 
acción n 


4,3,2. Estructuras selectivas 

Se ejecutan unas acciones u otras según se cumpla o no una determinada condición; pueden ser simples, 
dobìes o múltiples. 
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simples 

Se evalúa la condición y si ésía da como resultado verdad se ejecuta una determinada acción o grupo de 
acciones; en caso contrario se saltan dicho grupo de acciones. 

Diagrama de fíujo Diagrama N-S Pseudocódigo 


acción 



si <condìci ón> entonces 
acción 

f in_si 


dobles 


Cuando eí resultado de evaluar la condición es verdad se ejecutará una determinada acción o grupo de 
acciones y si el resultado es falso otra acción o grupo de accìones diferentes 


Diagrama de flujo Diagrama N-S 



^^\condición 

si 

nû 

acción 1 

acdón 2 


Pseudocódigo 

si < condi ción> en t onc e s 
acción 1 

si_no 

accion 2 

f in_si 


; múltiple 

L- 

r 

Se ejecutarán unas acciones u otras según el resultado que se obtenga al evaluar una expresión. Se 
j considera que dicho resultado ha de ser de un tipo ordinal ? es decir de un tipo de datos en el que cada 
f uno de los elementos que constituyen el tipo, excepto el primero y el ultimo* tiene un único predecesor 
\ y un único suceson 

\ Cada grupo de acciones se encoutrará ligado con: un valor, varios valores separados por comas, 
| un rango, expresado como valor_inìcial..valor_fînal o una mezcla de valores y rangos. 

ï Se ejecutarán únicamente las acciones del primer grupo que, entre los valores a los que está lígado, 
\ cuente con el obtenido al evaluar la expresióm Cuando el valor obtenido aì evaluar la expresión no esté 
\ presente en ninguna lista de valores se ejecutarían las acciones establecidas en la cláusula si_no, si 
e existiese dicha ctáusula* 
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Diagrama de fíujo Diagrâma N~S Pseudocódigo 



aoclùn 1 j | acclún 2^ | accìdn n 



^presión^. 


71 


r ^ 

ei no 

acciin 

accitìn 

atiitìrt 

sccitìn 

1 

2 

3 

l 

n 


Begún^eea < expresi ón> hacer 
<listâ.l> : <accionesl> 
<list&2 > : <acciones2> 


[si_no 

<accionesN>] 

f in_según 


4.3.3. Estructuras repetitivas 

Las acciones del cuerpo del bucle se repiten mientras o hasta que se cumpla una determmada condi- 
ción. Es frecuente ei uso de contadores o banderas para controlar un bucle. También se utilizan con esta 
finalidad los centinelas. 

Un centinela es un valor anómalo dado a una variable que permite detectar cuándo se desea termi- 
nar de repetir las acciones que constituyen el cuerpo dei bucle. Por ejemplo ? se puede disenar un bucie 
que pida el nombre y la nota de una serie de alumnos y establecer que termine cuando se le introduzca 
un **’ como nombre* Podemos considerar tres tìpos básicos de estructuras repetitivas: mientraB, 
hasta, desde. 


mìentras 

Lo que caracteriza este tipo de estructura es que las acciones del cuerpo deí bucle se realizan cuando la 
condición es cierta. Además, se pregunta por la condición al principio, de donde se deduce que dichas 
acciones se podrán ejecutar de 0 a N veces, 

Diagrama de fìujo Diagrama N-S Pseudocódigo 


mientras <expzesión_lóçfica> ïiacer 
<accíones> 

fin_mientraB 



hasta 

Las acciones del interior del bucle se ejecutan una vez y continúan repitiéndose mientras que la condi- 
ción sea falsa, Se interroga por la condición al final del bucle. 
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Diagrama de fìujo Diagrama N-S Pseudocódigo 


acción 



acción 


expresión lógica 


repetir 

<accíones> 

h.aeta_que <expresión_lógica> 


desde 

Se utiliza cuando se conoce, con anterioridad a que empiece a ejecutarse el bucle, ei número de veces 
que se va a iterar. 

La estructura deede comienza con un valor inicial de la variable índice y las acciones especifi- 
cadas se ejecutan a menos que el valor inicial sea mayor que el valor fínal. La varìabte índice se 
incrementaen 1 ? o enel valor que especifiquemos, y si este nuevo vaîorno excedeal final se ejecutande 
nuevo las acciones. 

Si establecemos que la variable índice se decremente en cada iteración el valor inicial deberá ser 
superior ai finaf Consideranxos siempre la varìable índice de tipo entero* 

Es posible sustituir una estructura deede por otra de tipo mientras controlada por un contador. 

Diagrama de fìujo Diagrama N-S Pseudocódigo 



desde v = vi hasta vf 


acción 




desde v vi hasta vf 

*+> [ increiaanto | decremento incr } 
hacer 

<acciones> 

f in_desde 


4 , 3 . 4 , Estructuras anidadas 

Tanto las estructuras selectivas como las repetitivas pueden ser anidadas, e ìntroducidas unas en el 
interior de otras. 

La estructura selectiva multipie es un caso especial de varias estructuras selectivas dobles anida- 
das en la rama ei_no. 

si <conâicíónl> entonces 
<accionesl> 

si„_no 

si <condîción2> entoncee 
<accione$2> 
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si_no 

ai <condición3> ôntonces 
<&ccìones3> 

si_no 

<accionesX> 

f in_si 
f in_ai 
f in_si 


Cuando se inserta un bucle dentro de otro la estructura interaa ha de estar totalmente inciuida 
dentro de la extema. Es posible anidar cualquier tipo de estructura repetitiva. Si se anidan dos estruc- 
turas desde, para cada valor de la variable índice del ciclo extemo se debe ejecutar totalmente el bucle 
intemo. 

desde vl *- vil hasta vfl hacer 
deede v2 «- vi2 hasta vf2 hacer 
<acciones> 
f in_desde 
fin_desde 


Las accìones que componen el cuerpo del bucle 
veces: 

(vfl ' - vil + 1) * 


más interno se ejecutarán el siguiente numero de 

(vf 2 - vi2 + 1) 


44. Ejercîcios resueltos 

4.h Dados fres números t dedudr cuâl es eî centraî 


Anátìsis del problema 

DATOS DE SALIDA: Central (el número central) 

DATOS DE ENTRADA: A, By C ( los numeros que vamos a comparar) 

Se trata de ir comparando los tres números entre sí, utilizando seìecciones de una sola comparación 
anidadas entre sí, ya que así se ahorran comparacíones (sólo utilizamos 5), Si se utilizan comparacio- 
nes con operadores lógicos del tipo A<B and B>C, se necesitarían seìs estructuras selectivas por lo 
que se estarían haciendo dos comparaciones por selección. 


Disefio del algorìtmo (con comparaciones dobles) 

algoritmo Ej ercicio_4_l 


var 
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entero : a , 

■ . b, c 

: , 

central 

inicio 






leer (a, b f c) 




si (a < b) 

y 

(b 

< 

c) 

entonces 

central 

«- 

b 




f in_ei 






si (a < c) 

y 

(c 

< 

b) 

entonces 

central 

«- 

c 




f in_si 






si (b < a) 

y 

(a 

< 

c} 

entonces 

central 

«- 

a 




f in_si 






si (b < c) 

y 

(c 

< 

a) 

entonces 

central 

«- 

c 




f in_ei 






si (c < a) 

y 

ía 

< 

b) 

entonces 

central 

«- 

a 




f in_si 






si (c < b) 

y 

(b 

< 

a) 

entonces 

central 

«- 

b 





f in_si 

escribir (central ) 
f in 


\ Diseno del algoritmo (con comparacìones simptes) 

\ 

| algoritmo e j ercicio_4_l 

t var 

ì entero : a , b , c , c ent ral 

inicio 

; leer ( a , b , c ) 

si a > h entoncee 

si b > c entonces 

^ central b 

si_no 

ŷ . ei a > c entonces 

; central c 

\ ei_no 

1 central a 

fin_si 
| si_no 

si a > c entonces 

p. central «- a 

si_no 

si c > b entonces 

central ■*- b 

si_no 

i central — 


a 
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f in_ei 
fìn_si 
f in_sì 

escribir (central ) 

f in 


4,2, Caicular la raíz cuadrada de un número y escribir su resultado. 


Análìsis del problema 

Com o dato de salida se tendrá la raíz y como entrada el número. Lo único que hay que hacer es asignar 
a raíz la raíz cuadrada del número, siempre que éste no sea negativo, ya que en ese caso no tendria 
una solución real. Se utilizará la función raizcua si se considera implementada; en caso contrario, 
deberá utilizarse la exponenciación. 


Diseno del atgoritmo 

algoritmo ejercicio_4_2 
var 

entero r n 
real r raíz 
inicio 

leer (n) 

ei n < 0 entoncea 

escribir ( 'no hay solución real f ) 

si_no 

raíz n A (1/2) 

escribir (raíz) 
f in_si 
f in 


4.3. Escríbir los diferentes métodos para deducir si una varìable o expresión numêrìca e$ par. 

La forma de deducción se hace generalmente comprobandû de alguna forma que el número o expresión 
numérica es divisible por dos, La forma más común sería utilizando el operador modj el resto de la 
división entera, La variable a comprobar, var f será par sí se cumple la condición 

var mod 2=0 

y en caso de no disponer del operador mod y sabiendo que el resto es 

resto = dividendo - divisor * ent (dìvidendo / divisor) 
se trata de ver si var es par si se cumple la expresión siguiente 

var - 2 * ent (var / 2) = 0 

Otra variante podría ser comprobar si la división real de var entre 2 es igual a la división entera 
de var entre 2 
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var / 2 = var div 2 

Oj siguiendo el mìsmo método si 

vár / 2 = ent (var / 2) 

En algunos casos* estos ejemplos pueden llevar a error según sea ta precisión que la computadora 
obtenga en el cálculo de la expresión. 

4*4* Determìnar el precio de un biUete de ìda y vuelta en ferrocarriì, conociendo la dìstancìa a 
recorrer y sabiendo que si el nûmero de días de estancia es superior a siete y la dìstancia 
superior a 800 hìlómetros el biîlete tiene una reducción del 30%. El precìo por Ìúlómetro es de 
2,5 pesetas , 


|; Análisis del problem a 

[ DATOS DE SALIDA: Precio del billete 

; DATOS DE ENTRADA: distancia a recorrer, días de estancìa 

; Se lee la distancia y el número de días y se halla el precio del billete de ida y vuelta (precìo = 
distancia * 2 * 2 . 5). Se comprueba si la distancia es superior a 800 Km, y los días de estancia 
J a 7 y si es cierto se aplica una reducción del 30%, 

* Diseno del algoritmo 

algoritmo ejercîcio_4_4 

l var 

entero : dìstáncia, días 
real : precio 
! iuicio 

leer (dí stancia, días ) 
i precio +- dìstancia * 2 * 2,5 

si días > 7 y distancia > 800 entoncas 
precio precio * 0.3 

fin_si 

©ecribir (precio) 
h fin 


;■ 4*5* Disenar un algoritmo en eì que a partir de una fecha ìníroducida por teciado con eì formato 
; DÌA, MES, âSO, se obtenga la fechá del dia siguìente. 


I Análisîs del problema 

DATOS DE SALIDA: 
î DATOS DE ENTRADA: 


dds , mms , aas (día ? mes y ano del día siguiente) 
dd, mm, aa (día mes y ano del día actual) 
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En principio lo único que habría que hacer es sumar una unidad al día. Si el día actual es menor que 28 
(número de días del mes que menos dias tiene) no sucede nada, pero se debe comprobar si al surnar rm 
dia ha habido cambio de mes o de ano, para lo que se comprueba los días que tìene el mes, teniendo 
también en cuenta los aflos bisiestos. También se debe comprobar si es el último día del aflo en cuyo 
caso se incrementa tatnbién el aflo. Se supone què la fecha introducida es correcta. 


Diseno del algoritmo 

algoritmo e jercicio_4_5 

var 

©ntero : dd, mm, aa, dds , rtnns , aas 

inicio 

leer {âd f mm, aa) 
âds - dd + 1 
mms mm 

aas aa 

ei dd >= 28 entonces 
aegún_eea mm hacer 

'//si el mes ' tiene treinta' días " 

'4/6,9,11 : ei dds >'30 entòncée 
dds - 1 
mms ■*- mm + 1 

fin_si 

//sî el rnes es febrero 

2 : si (dds > 29) o (aa mod 4 <> 0) entonces 

dds *- 1 ■ . 

mms 3 

fin_si 

/ /si el mes tiene 31 días y no es diciembre 

1,3,5,7,8,10 : si dds > 31 entonces _ f ; ■. 

dds 1 

mms iïuïi . + 1 

f in_si 

si_no 

//si el mes es dicìembre 

sì dds > 31 entonces 

dds 1 
mms «- 1 

aas *- aa + .1 . ■ . .• .. . .. : 

fin_si 

fin_según 

fin_BÌ 

escribir {dds , mms , aas) ■ 

fin 

4.6, Se desea reaîizár una estadística de los pesos de ïos alumnos de un coiegió de acuerdo a la 
siguìente tabîa: 
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Alumnos de menos de 40 kg. 

Alúmnos entre 40 y 50 kg. 

Alumnos de más de 50 y menos de 60 kg. 

Àlumnos de mâs o ìgual a 60 kg. 

La entrada de los pesos de los aîumnos se termìnarâ cuando se introduzca el vaîor centinela - 
99. Àlfinaï se desea obtener cuàntos alumnos hay en cada uno de los baremos . 


Análisis del problema 

DATOS DE SALIDA: contal , conta2 , conta3 , conta4 ( contadores de cadauno de 

los baremos) 

DATOS DE ENTRADA: peso (peso de cada urto die los alumnos) 

Se construye un bucle que se ejecute hasta que el peso introducido sea igual a -99. Dentro del bude se 
comprueba con una serie de estructuras si anidadas a qué lugar de la tabla corresponde el peso, 
incrementándose los contadores correspondientes. Cuando se haya salido del bucle se escribirán los 
contadores. 

Nótese que ha de leer el peso una vez antes de entrar en el bucle y otra vez como últíma instrucción 
de éste ? pues de lo contrario se incluirá el centinela (-99) en la estadística la última vez que se ejecute el 
bucle. 


Diseno del algoritmo 
TABLA DE VARIABLES: 


entero : contal , conta2 , conta3 , conta4 
real : peso 
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4* 7* Realizar un algorìtmo que averigue si dados dos números ìntroducidos por teclado t uno es 
divisor deí otro. 

Análisis del problema 

DATOSDESALIDA: E1 mensaje qxie nos dice si es o no divisor 

DATOS DE ENTRADA: núml , núm2 (ìos números que introducimos por teclado) 

DATOS AUXILIARES: divisor (variable lógica que será cierta si el segundo numero es dívisor 

del primero) 

En este problema se utiliza el operador itiod para comprobar si núm2 es dívisor de núml Si el resto de 
dividir los dos números es 0 se establece la variable divìsor como cierta ? y en caso contrario como 
falsa. 

Preguntando por el valor del divisor se obtiene un mensaje que nos indicará si núm2 es o no 
divisor de n\im2 


Diseno del algoritmo 

TABLA DE VARIABLES: 

entero : ndml , núm2 
lógico : divísor 



4*8* Ánaìizar îos distintos mêtodos âe realìzar la suma de T námeros ìntroducìdos por teclado, 

Para realizar la suma de T números será imprescindible realizar un bucle que se ejecute T veces y que 
incluya una operación de lectura y un acumulador. A1 conocer de antemano el número de veces que se 
ejecuta el bucle (T) s lo más adecuado será utilizar un bucle de tipo desde: 


deede i 


1 baate T hacer 


Jntroduocìán a ia programación estructurada 69 


leer (número) 

snma «- suma + irumero 

fin_desde 


E1 mismo bucle se puede realizar con una estructura mientras o repetir, en cuyo caso dentro 
' del bucle se ìncluirá también un contador. 

( Con una estructura mientras: 


f : conta +- 0 

E mientr&s conta < T tiacer 
leer (número) 
suma suma + número 
\ conta conta + 1 

fin_mientras 


Con una estructura repetir: 


conta +- 0 
repetir 

leer(número) 
suma «- suma + número 
conta «- conta + 1 
hasta_gue conta = T 


4,9, Se desea un algorìtmo que realice la operación de suma o resta de dos números ìeidos del 
teciado en Juncìón de la respuesta S o R (suma o resta) que se dé a un mensaje de peúcìón de 
datos. 

Análisis del problema 

DATOS DE SALIDA: resultado (resultado de la operación suma o resta de los dos números) 

DATOS DE ENTRADA: a, b (los números a operar), operacìón (tipo de la operación a efec- 

tuar) 

Después de leer los números ayb } im mensaje ha de solicitar que pulsemos una tecla S-o una tecla R 
paia realízar una u otra operación. Aquí se incluye un bucle que se repita hasta que la entrada sea S o 
R, para evitar errores de entrada. En función de la respuesta se calctxla el resultado que será a + b, en 
caso que la re&puesta sea S t o .a - b en caso que la respuesta sea R. 
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Diseno del algorîtmo 

algoritmo ej ercicio_4_9 
var h 

antero : a, b, resultado 

carácter : operación 

inicio ' 
leer (a, b) 

eecribir ( 'Pulse S para sumar, R. para restar') 

repetir 

leer (operación) 

haeta_gue (operación = 'S' ) o (operacíón = 'R') 
si operación = 'S' entoncee 
resultado — a + b> 

ai_.no 

resultado .a - b 

f in_ai 

escribir (resultado) 

f in 


4,10 , Escribir un algorìtmo que lea un número y deduzca sì estâ entre 10 y 100 \ ambos inclusive. 


Análisîs del problema 

DATOS DE SALIDA: El mensaje que indica si el número está entre esos límites 

DATOS DE ENTRADÂ: núm (el número que se desea comprobar) 

Mediante una comparación múltiple se comprueba si el número está entre esos límites, èn cuyo caso 
aparecerá un mensaje. 


Disefto del algoritmo 
TABLA DE VARIABLES 
entero : num 

I 'lnlcio' ' 


egcrlblr ' ■ 

('está eritreiDy 100) 

• : Fln 

4,11, Se dìspone de las califlcaciones àe los alumnos de un curso de ìnformâtìca correspondientes a 
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las asìgnaturas de BASIQ FORTRAN y PASCAL. Dìsenar un algoritmo que calcule la media de 
cada alumno. 

Anâlisis del problema 

DATOS DE SALIDA: media (una por alumno) 

DATOS DE ENTRADA: nota (tres por alumno) y n (número de alumnos) 

DATOS AUXILIARES: i s j (variables que controlan los bucles) 

Hay que leer el número de alumnos para conocer las iteraciones qne debe ejecutarse el bucle (si se 
utilizara un bucle repetir o mientras se debéría establecer alguna otra condición de salida), 
Dentro dei bucle prmcipal se anida otro bucle que se repite tres veces por alumno (cada alumno tiene 
tres notas) en el que leemos ia nota y la acumulamos en la variable media, A1 finalizar ei bucle intemo 
se halla y se escribe ta media* 


Diseno deí algoritmo 

algoritmo ejercicio_4_ll 

var 

entero : n f i , j 

real : media, nota 

inicio 

lçsr (n) / /número de alimmos 

desde ì = 1 hasta n hacer 

media — 0 

desde j = 1 hasta 3 hacer 
leer (nota) 

media media + nota 

f in_desde 

medìa media/ 3 
escrîbir (medìa) 
f in_desde 
f in 


4J2. Escribir el ordinograma y el pseudocódìgo que calcule ìa suma de los 50 prìmeros numeros 
enteros. 


Análisis del problema 

DATOS DE SALIDA: suraa (suma de los primeros 50 números enteros) 

DATOS AUXELIARES: conta (contador que irá sacando los números entcros) 

Se trata de hacer un bucle en el que se incremente tm contador y que se acumule el valor de éste en un 
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acumulador (suma). E1 bucle se ejecutará hasta que el contador sea igual a 50. 

Diseno del algoritmo 

TABLA DE VARIABLES: 

entero : suma, conta 

Ordinograma 



Pseudocódigo 

algoritmo ej ercicio_4_12 

var 

entero : suma , conta 

ìnicio 

suma 'í- 0 
conta 0 

repetir 

conta *- conta + 1 
suma suma + conta 

hasta^jjue conta = 50 
escrìbir ( suma ) 
f in 
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4J3* Calcular y escrìbir íos cuadrados de una serie de números disîìnios de 0 leídos desde eì teclado 


Anátisis del problema 

DATOS DE SALIDA: cuadrado 

DATOS DE ENTRADA: ndm 

Dadoquese desconoce lacantidaddenúmerosleidos, sedebe utilizarunbuclerepetir omientras. 
Se construye un bucte hasta que el número sea 0, Dentro del bucle se lee núrn y se çalcula su cuadrado. 
Para no incluir el último número -el cero-, se ha de leer antes de entrai al bucle y otra vez al final de 
éste. 


Diseno del algoritmo 

algoritmo e j ercicio_4_13 

var 

entero : núm, cuadrado 
inicio 

leer (núm) 

mientras num <> 0 hacer 

cuadrado +- num * núm 
escribir ( cuadrado ) 
leer (núm) 
f ln_mientrae 
fin 


4A4* Un capital C estâ situado a un tipo de înterés R ^Se doblará el capìtal al térmìno de dos anos? 

Análisis del problema 

DATOS DE SALIDA: E1 mensaje que nos dice si el capital se dobla o no 

DATOS DE ENTRADA: C (capital), R (interés) 

DATOS AUXILIARES: CF (capital al final del periodo) 

Después de introducir el capital y el interés por teclado, se calcula el capital que se producirá en dos 
aîíos por la fórmula del interés compuesto: 

CF = C ( i+R) 2 

Si CF es igual a C*2 aparecerá el mensaje dlcíendo que el capital se doblará. 
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Disenodel algoritmo 

algoritmo E j ercicîo_4_14 

var 

entero : C 
real ; R,CF 
ìnicio 

leer (C,R) 

CF - C* (l+R/100) "2 

si C*2 <= CF entonces 

escribir ( ' E1 capitaí se doblará o superará el doble ' )' 

ei_no 

escribir ( J E1 capital no se doblará f ) 

f in_si 
f in 


4*1 5* Leer una serie de nùmeros desde el termìnal y calcular $u medìa. La marca defin de lecîura 
será eí número -999. 


Análìsis det problema 

DATOS DE SALIDA; media (medía de los números) 

DATOS DE ENTRADA: núm (cada uno de los números) 

DÂTOS AUXILIARES: conta (cuenta los números introducidos excepto el -999), suma (suma 

los números excepto el -999) 

Se debe construir un bucle que se repita hasta que el número introducido sea -999, Como ya se vio más 
arriba (ejercicio 4. 1 3.) se debe leer antes de comenzar el número y al frnal del bucle. Dentro del bucle se 
incrementará un contador, necesario para poder calcular la media, y un acumulador guardará la suma 
parcial de los numeros introducidos, Una vez fuera del bucle se calcula e imprime la media. 


Diseho det algoritmo 

algoritmo ejercicio_4_15 

var 

entero : conta, su ma , núm 
real : media 
inicio 

conta +- 0 
suma — 0 
laer (núm) 

mientras núm <> -999 hacer 
conta conta +■ 1 
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s uma. suma + num 

leer (núm) 
f i n_mi en t r e s 
media — suma / conta 
eacribir (media) 
f in 


4.16. Se considera îa serie definida por: 

a } -0 t a 2 -l t a=3*a n} +2*a n2 (para n >=3) 

Se desea obíener el valory el rango del prìmèr tèrmìno que sea mayor'o igual qUe 1000 ♦ 


Anâlisîs del problema 

DATOS DH SALIDA: i (rango del primer término de lá serié mayor o igual que 1000), último 

(valor de dicho término) 

DATOS AUXILIARES: penúltimo (penúltimo valor de la serieX valor (valor actual) 

Se calcula el término por tanteo, es decir a partir del tercer térrûíno, se ejecuta un bucle que se realice 
mientras que el valor del término sea menor que 1000, 

Para ello se inicializa i a 2 ? último a 1 y penúltimo a 0. Dentro del bucle se calcula el valor 
(3 * último + 2 * penúltìmo). Antes de fínalízar el bucle se deben actualizar Ìos valores de 
penúltimo (penúltimo — último) y último (último valor). También se ha de 
incrementar el contador i en una unidad. Àl finalizar el bucle, primer valor mayor o igual a 1000 será 
último s yel término i . 


Diseûo del algoritmo 

algoritmo ejercîcio_4_16 

var 

entero : i f valor , último, penult imo 

inicio 
i «- 2 

últ imo ■*- 1 
penúltimo 0 

mientras último < 1000 hacer 

valor — 3 * último + 2 * penúltimo 
ì i+l' 

penúltimo *- último 
último valor 

f in_mientras 
eecribir (último, i) 
fia 
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4.1 7. Escribir un algorìtmo que permìta calcular X } donâe: 

X puede ser cualquier nùmero real distinto de 0 
n puede ser cualquier entero posìtivo, negativo o nuìo 
Nota: suponemos que no está impìementaâo eì operador de exponenciacìón. 


Análisis del problema 

DATOS DE SALIDÀ: potencia (resultado de elevar X a la n) 

DATOS DE ENTRADA: X (base de la exponenciación), n (exponente) 

DATOS AUXILIARES: conta (contador que controla el número de veces que se multiplica X por 

sí mismo) 5 solucíón (será falso si no hay solución) 

Después de íntroducir X y n, se comprueba n. Si es 0, potencìa valdrá 1. Si es positivo se ha de 
multiplicar X n veces, y ello se hará mediante un bucle en el que se vayan guardando en la varíable 
producto tas sucesivas multiplicaciones. En el bucle un contador irá controlando las veces que se 
ejecuta el bucle, que finalizará cuando sea igual a n. Si n es negatívo, primero se comprueba que x sea 
distìnto de cero, pues en ese caso no tendrá solución. En caso contrario se procederá de la misma forma 
que si es posítivo, pero la potencia será 1/potencia, 


Diseno del algoritmo 


algoritmo e jercicîo_4_17 

var 

entero : n, conta 
real : X, potencia 
lógico : solución 
inicio 

leer (X, n) 

solución «- verdad 
ai n = 0 entoncea 
potencia «- 1 

ei_no 

si n > 0 entonces 

potencia 1 
conta «- 0 

repetir 

potencia «- potencia * X 
conta «- conta +■ 1 
hasta_que conta = n 
si_no 

si X = 0 entonces 

escribìr ( hay solución' ) 
solución «- faleo 
ei_no 

potencia — 1 
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conta 0 

repetlr 

potencia potencia * X 
conta *- conta -1 

hesta_<pie conta - n 
potencia *- 1 / potencia 

fln_si 
f in_sl 
fin_BÌ 

si solución entonces 
escribir (potencia) 
fin_si 

fin 


4* 18* Se desea ìeer desde teclado una serie de números hasta que aparezça aiguno menor que 1000 , 

Análisis delproblema 

En este algoritmo, sólo hay un dato de entrada, que será cada uno de los ntoeros que leemos, y no 
tenemos ningón dato de salida. No hay más que ejecutar rm bucle hasta que el número leído sea menor 
de 1000. 


Diseho del algoritmo 

algoritmb ejercicid_4_18 

var 

rsal : . núm . 
inicio 
repetir 

leer (núm) 

liastaiigue núm-<- 1000 ' //bóIo se admiten los menores-' de 100Q : 

fin 


4.19* Se desea obtener îos cuadrados de todos los números ïeídos desde un archìvo hasta que se 
encuentre el número 0. 

Análisis del problema 

Este ejercicio es muy sìmìlar al anterior aunque se introduce la noción de archivo que será vista en 
profundidad más adelante. Por el momento no vamos a tener en cuenta las operaciones de abrir y cerrar 
el archivo P así como la marca de fin de archívo o la definición de su estructura. Para leer numeros desde 
el archivo lo úníco que vamos a hacer es una operación de lectura indicando que se lee desde un 
archivo: 
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leer ( nambre del 


archivo, lista de variajbles) 


Diseno del algoritmo 

algoritmo ejercício_4_19 

var 

real : mám 
ìnicio 
repetir 

leer {archivo f núm) 
sì ntím <> 0 entoncee 
escribirínúm A 2 ) 
f in_si 

haeta_que núm = 0 
fin 


4.20, Álgoritmo que recìba una fecha por teclado ~ dd t mm, aaaa - T asi como el día de la semana que 
fue el primero de enero de dicho ano f y muestre por pantalla eì âia âe la semana que corres- 
ponde a la fecha que le hemos dado. En su resoîución deben consìâerarse los anos bisiestos. 


Análisis del problema 

Se comenzará realizando una depuración en cuanto a la introducción de datos. Una vez aceptada una 
fecha como correcta, se inicializará a 0 la variable dtotal y se acumulan en ella los días correspon- 
dientes a cada uno de los meses transcurridos, desde enero hasta el mes anterior al que indica la fecha, 
ambos inclusive. Por ultimo le ahadiremos los días dei mes actuaL 

Si hacemos grupos de 7 con dtotal, se obtendrá un cierto número de semanas y un resto. Para 
averiguar el día de la semana en que cae ia fecha especificada, bastará con avanzar, a partir del día de 
la semana que fue el primero de enero de dicho aho, el número de días que indica el resto. 

Se ha de tener en cuenta que, considerando que la semana comienza en lunes, avanzar desde el 
domingo consiste en volver a situarse en el lunes* 


Diseno del algoritmo 

algoritmo e j erc icio_4_2 0 

var 

entero : dd, aaaa, contm, dtotal , dl 

cerácter : día 

lógico ■: correcta,- bisiesto 

inicio 
repetir 

bisiesto «- 


Êalso 



Intraducción a la pragramacìón estructurada 


correcta +- verdad 

©scribir ( ' Deme f echa (dd mm aaaa) ' ) 
leer (dd, mm, aaaa) 

si (aaaa mod 4 = 0) y (aaaa mod 100 <> 0) o 

( aaaa mod 400 = 0 ) entonces 

bisiesto ■ +- verdad 

f in_si 

segiin_sea itm hacer 

1, 3 f 5 , 6 , 8, 10, 12: 

si dd > 31 entonces 

correcta *- falso 

f in_si 

4 , 1, 9, 11: 

si dd > 30 entonces 

correcta +- falso 

f in_si 

2 : 

si bisiesto entoncee 
si dd > 29 entonces 

correcta *- falso 

f in_si 
si_no 

si dd > 28 entonces 

correcta *- f aiso 

f in_si 
f in_si 

si_no 

correcta *- falso 

f in_según 

hasta_cjue correcta 
dtotal 'í- 0 

desde contm *- 1 hasta mm - 1 hacer 
según_sea contm hacer 
1, 3, 5, 6, 8, 10, 12: 
dtotal *- dtotal + 31 
4 , 7 , 9, 11: 

dtotal *- dtotal + 30 

2 : 

si bìsiesto entonces 
dtotal *- dtotal + 29 

si_no 

dtotal *- dtotal + 28 

f in_BÌ 
fin_según 
f in_deede 

dtotal *- dtotal + dd 

repetir 

escribir ( ' Deme día de la semana qne fue el 1 
*+ de ENERO ( 1 /m/x/ j /v/s/â) * ) 

leer (día) 
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según_eea dia hacer 

dl <- 0 
"m' f 'M' : 

ai «- i 

'x' f 'X' : 
dl <- 2 

di <- 3 
' v ' / 'V' : 
di <- 4 
's' , 'S' : 
dl <- 5 
'd' , 'D' : 
dl <- 6 

si_no 

di <- -io 

f in_según 

heeta_que (dl >= 0 ) y (dl <= 6 ) 
dtotal <- dtotal + dl 
eegún_sea dtotal mod 7 hacer 
1 : 

escribir ( ' Lunes ' ) 

2 : 

escribir ( 'Martes ' ) 

3 : 

escribir í 'Míércoles ' ) 

4 : 

escribir ( 'Jueves ' ï 
5 : 

escribir í 'Viernes ' ) 

6 : 

escribir ( ' Sábado ' ) 

0 : 

eecribir ( ' Domingo ' ) 

f in_según 
f in 



Subprogramas 
(subalgoritmos), 
procedimientos y funciones 


5.1. Programación modular 

E1 diseno descendente resuelve un problema efectuando descomposiciones en otros problemas más 
sencìllos a través de distintos niveles de refmamiento. La programación modular consiste en resolver 
de forma independiente los subproblemas resultantes de una descomposición. 

La programación modular completa y amplía el diseíio descendente como método de resolución de 
problemas y permite proteger la estructura de ia información asocìada a un subproblema. 

Cuando se trabaja de este modo, existirá un algoritmo principal o conductor que transferirá el 
control a los distintos módulos o subalgoritmos, los cuales* cuando terminen su tarea, devolverán el 
control al algoritmo que los llamó* Los módulos o subalgoritmos deberán ser pequenos, seguirán todas 
las reglas de la programación estructurada y podrán ser representados con las herramientas de progra- 
macìón habituales. 

E1 empleo de esta técnica facilita notoriamente el diseno de los programas; por ejemplo: 

• Como los módulos son independientes, varios programadores podrán trabajar simultáneamente 
en la confección de un algoritmo, repartiéndose ias distintas partes del mismo. 

■ Se podrá modificar un módulo sin afectar a los demás, 

* Las tareas, subalgoritmos, sólo se escribirán una vez ? aunque se necesiten en distintas ocasiones 
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a lo largo del algoritmo. 

Existen dos tipos de subalgoritmos: fimciones y procedimientos. 


5>2. Funciones 

Una función toma uno o más valores, denomiuados argumentos o parámetros actuales y s según el valor 
de éstos, devuelve un resultado en el nombre de la fìmción. Para invocar a una función se utiliza su 
nombre seguido por los parámetros actuales o reales entre paréntesis en una expresión, Es decir que se 
podrá colocar la llamada a una función en cualquier instrucción donde se pueda usar una expresión. 
Porejemplo escribir (raíz2 (16) ) . O f si la función se denomina f y sus parámetros sonpl, p2 
y p3 escribir ( f (pl , p2 , p3 ) ) . 

Cada lenguaje de programación tíene sus propias funciones incorporadas, que se denominan rnter- 
nas o intrínsecas, Se considerarán como intemas únicamente las más básicas y comunes a casi todos los 
lenguajes y se irán comentando a lo laxgo del libró en los capítulos adecuados, es decir cuando para 
explicar el tema se necesite una referencía a alguna de ellas. 

Si las funciones estándar no permiten realizar el tìípo de cálculo deseado será necesario recuirir a 
las funciones extemas, que definiremos mediante una declaración de función. 


5.2. 1. Declaración de funciones 

Las funcìones, como subatgoritmos que son ? tienen una constìtución similar a los algorìtmos. Por 
consiguiente, una función constará de: 

• cabecera, con la defínición de la función 

* cuerpo de la función 

Dentro del cuerpo de la función estará el bloque de declaraciones y el bloque de instrucciones. Este 
debe incluir una instrucción mediante la que la función tomará un valor para devolverlo al algoritmo 
llamador. 

Para que las acciones descritas en una funcíón sean ejecutadas se necesita que ésta sea invocada, y 
se le proporcionen los argumentos necesarios para realizar esas acciones* En la defìnición de la función 
deberán figurar una serìe de parámetros, denominados parámetros formales s para que, cuando se llame 
a la función se pueda estabîecer una correspondencía uno a uno y de izquierda a derecha entre los 
parámetros actuales y los formales. En el cuerpo de la función se utilizarán los parámetros formales 
cuando se quíera trabajar con información procedente del programa llamador. E1 pseudocódigo corres- 
pondiente a una función sería 

<tipo_de_ôato> funcióti <nombre_funcìón> ( lista_de_parámetros_formales) 

[ declaraciones locales ] 

inicio 


devolver ( < expresi ón > ) 

f ìn_función 
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La lìsta_d e_jpa ráme t ro s_ f orma 1 es estará formada por una o más sublistas de parámetros 
de la siguiente forma: 

{E I S | E/S } <tìpo_de_dato> : <nombre_de_parámetro_formal> . , . 

Las Uaves quieren decir que se elija sóio una entre las distintas opciones que aparecen separadas 
por una barra. En ias ftmciones habitualmente será E. Todo esto se detallará más adelante. Los corche' 
tes indican no obligatoriedad. E1 tipo de dato debe ser estándar o haber sido defmido de antemano. 
Podemos separar distintos tipos de parámetros utilizando el punto y coma (;) entre cada declaración. 


5.3. Procedimientos 

Un procediniiento es un subalgoritmo que realiza una tarea específica y que puede ser definido con 0, 1 
o N parámetros. Tanto la entrada de información al procedimiento como la devolución de resultados 
desde el procedimiento al programa llamador se realizarán a través de los parámetros. E1 nombre de un 
procedimiento no está asociado a ninguno de los resultados que obtiene. 

La ínvocación a un procedimiento se realìza con una instrucción llamar_a o bien directamente con 
el nombre del procedimiento. Es décir: 

[llamar_a] <nombre_procedimiento> [ ( lista_de_parámetros_actuales } ] 

Como se puede apreciar con respecto a la lista de parámetros no existe obligatoriedad. 

5,3,7. D&ciaración de procedimientos 

La declaración de un procedimiento es similar a Ja de una función, ias pequenas diferencias son debidas 
a que el nombre del procedimiento no se encuentra asociado a ningún resultado. La declaración de un 
procedimiento expresada en pseudocódigo sería: 

procedimlento <nombre_procedirûiento> [ ( lista._de _parámetros_fQrmales } ] 

[ declaraciones locales ] 

inicio 


f i n_pr o c & d imí ent o 


La lista^de^pará^etros^forjnâlesestaráformadaporunaomássublistasdeparámetros 
de la siguiente forma: 

{EISIE/S} <tipo_de_dato> : <riombre_de_parámetro_formal> . ■ . 

y seguiría la mismas reglas que la deciaración de parámetros en ias funciones. 

En el algoritmo principal las declaraciones de procedimientos y funciones, se situarán al final, al 
objeto de agilizar la escritura de algoritmos. 
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5.4. Estructura general de un algoritmo 

algoritmo <nombte_algori tmo> 

conet 

<n ombr e_de_cons t an t el > = va 1 or 1 


tipo 

<clâse > : < n oiïìbre_ del_ tipo> Ì Ì Se verá en capítulos posteriores 

var 

<nombre_del_típo > : <nombre_de_varíablel> [ f <nombre_de_variable2> f . . . ] 


// Los datos han de ser declarados antes de poder ser utilizados 
inicio 

<accîónl> 

<acción2> 

llaínar a<noj?ìjbre de procedimiento> [ { lista_de_parámetros_actuales) ] 
// la llamada a la función ha de realizarse en una expresión 
eecribir (<nombre_de^funcìón> ( lÌ 3 ta_de_parámetros_actuales) ) 

/iSe utilizará siempre la sangría en las estructuras 
/ / selectivas y repetitivas* 


<acciónN> 

f in 

procedimiento <nombre _procedímíento>[ (lista_de_paráKietros_forinales}] 
[ declaraciones locales ] 

inicio 


f in_procedimiento 

<tipo_de_dato> función <nomhre_funcidn> [ ( lista_âe_parémetros_formales) ] 
// ei <tìpo^de_dato> devuelto por la función es un tipo estándar 
[ declaraciones locales ] 

ìnicio 


devolver ( <expresión> ) 

fin_función 


5.5. Paso de parámetros 

Cuando un programa llama a un procedimiento o funcìón se establece una correspondencia entre los 
parámetros actuales y los foimales. Existen dos formas para establecer la correspondencia de parámetros. 

• Posicional. Emparejando los parámetros reales y formales según su posición èn las listas. Esto 
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> requiere que ambas listas tengan el mismo iiumero de parámetros y que los que se van a empa- 

rejar coincidan en el tipo* En la definíción del subprograma deberá reflejarse siempre de qué 
i tipo es cada uno de los parámetros formales. 

\ (E <tipo_de_dato> : <nombrel_de_paráinet:ro_forma.l> . . . ) 

\ EI típo de dato debe ser estándar o haber sido definido de antemano, Si los parámetros formales 

se separan por comas es necesario, aunque no sufíciente, que tengan el mismo tipo. Si su tipo 
fuera distinto habría que poner: 

[ (E <tipo_de_datol> : <noxnbrel_de_parámetro_f ormal> ; 

E < t ì po_de_da t o 2 > : < n ombr e 2 _de_pa r áme t r o_ f o rma 1 > ) 

• Correspondencia por el nombre explícito. En las llamadas se indica explícitamente la corres- 
pondencia entre los parámetros reales y foimales. 

ì Dado que la mayor parte de los lenguajes usan exclusivamente la correspondencia posicional ? éste 
r será el método que se seguirá en la mayoría de los algoritmos. 

■ A1 hablar de los procedimientos se decía que devueiven resultados al programa principal a través 
| de los parámetros, pero que también pueden recìbir informacìón, desde el programa princìpal, a través 
: de ellos. Esto nos lleva a una clasificación de los parámetros en: 

ì Parámetros de entrada Penniten unicamente la transmisión de información desde el pro- 

grama llamador al subprograma. 

Parámetros de salìda Sólo devuelven resultados. 

| Parámetros de entrada/salida Actúan en los dos sentidos, tanto mandando valores al subprograma, 

devolviendo resuitados desde el subprograma al programa llamador. 

: En los algoritmos, se debe especifícar en la definìción del subprograma cómo se desea que se 

ï comporte cada uno de ios parámetros; para ello se empleará la siguiente terminología: 

* E equívaldría a parámetro de entrada 

| * S querrá decir parámetro de salida 

: • E/S parámetro de entrada/salida 

En la lista de parámetros siguiente 

(E <tipp_de_datol> : <nombrel_de_parámetro_forinal> ; 

3 <tipo_de_datol> : <nombre2_ôe _parámetro_formal>) 

<nombrel_de_parámetro_formal> es parámétro de entrada y va a proporcionar datos al 
subprograma* <nombre2 de parámetro forma.l> es parámetro de salída y devoiverá resulta- 
; dos al programa llamador. Aunque ambos sondelmismo tipo, ctìpo^de^âatol^, habrá que repetir 
; el típo para cada uno de ellos y no se escriben separados por coma. 

Todo esto afectará tanto a procedimientos como a funciones. De lo que se deduce que una función 
; va a tener la posibilidad de devolver valores al progmma principal de dos formas: 

■ Como valor de la función 
I ■ A través de los parámetros 

Un procedimiento sóio podrá devolver resuitados a través de los parámctros, de modo que al 
codifícar el algoritmo se ha de tener mucho cuidado con el paso de parámetros» siendo preciso conocer 
; los métodos de transmisión que posee el lenguaje, para poder conseguir el funcionamiento deseado. Los 
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lenguajes suelen disponer de: 

Paso por valor Los parámetros formales correspondientes reciben una copia de los va- 

lores de los parámetros actuales; por tanto los cambios que se produzcan 
en ellos por efecto de) subprograma no podrán afectar a los parámetros 
actuales y no se devolverá información al programa llamador* Los 
parámetros resultarían de Entrada, E. 

Paso por valor resultado A1 finalizar la ejecución del subprograma los valores de los parámetros 
formales se transfieren o copian a los parámetros actuales* 

Paso por referencia Lo que se pasa al procedimiento es la dirección de memoria del parámetro 
actuaL De esta forma* una variable pasada como parámetro actual es 
compartida; es decir, se puede modificar directamente por el 
subprogratm Los parámetros serían de Entrada/Salida, E/S. 

Es posibte pasar como parámetros dátos y subprogramas. 


5.6. Variables globales y locales 

Una variable es global cuando el ámbito en el que dicha variable se conoce es el programa completo, 
Consideraremos como variables globales las que hayan sido declaradas en el programa principal y 
como locales las declaradas en el propio subprograma. 

Toda variable que se utilice en un procedimiento debe haber sido declarada en é). De esta forma 
todas las variables del procedimieuto serán locales y la comunicación con el programa principal se 
realìzará exclusivamente a través de los parámetros. A1 declarar una variable en un procedimiento no 
importa que ya existiera otra con el mismo nombre en ei programa principal; ambas serán distintas y, 
cuando nos encontremos en el procedimiento, sólo tendrá vigencia la declaración que hayamos efectua- 
do en él. Trabajando de esta forma obtendremos la independencia de los módulos. 


5.7. Recursividad 

Un objeto es recursivo si forma parte de sí mismo o interviene en su propia definición. E1 instrumento 
necesario para expresar los programas recursivamente es el subprograma, La mayoría de los lenguajes 
de programación admiten que un procedimiento o función haga referencia a sí mismo dentro de su 
definición, recursìvidad dírecta. También es posible que un procedimiento o función haga referencia a 
otro el cual contenga, a su vez, una referencía directa o indirecta al primero, recursividad indirecta* 

La recursión se puede considerar como una altemativa a la iteración y, aunque las soluciones 
iterativas están más cercanas a la estructura de la computadora, resulta muy útil cuando se trabaja con 
problemas o estructuras, como los árboles, definidos en modo recursivo* Por ejemplo el factorial de un 
número n, que se define matemáticamente como: 

n ! - n * (n-1 ) \ 

E1 problema genefal se resuelve en términos de otro caso del mismo, hasta llegar a uno que se 
resuelve de forma no recursiva. Existe un acercamiento paulatino al caso no recursivo. Para compren- 
der la recursividad hay que tener en cuenta que: 
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* Cuando se Uama a un procedimìento o ftmción los parámetros y las variables locales toman 
nuevos valores y el procedimiento o función trabaja con estos nuevos valores y no con los de las 
anteriores llamadas. 

* Cada vez que se llama a un procedimiento o fimción los parámetros de entrada y variables 
locales son almacenados en las siguientes posiciones libres de memoria y cuando termina la 
ejecución del procedimiento o función son accedidos en orden inverso a como se introdujeron. 

* E1 espacio necesitado para almacenar los valores crece pues conforme a los niveles de anidamiento 
de las llamadas* 

■ E1 cuerpo del procedimiento o función debe disponer de una o varias instrucciones selectivas 
donde establecer la condición o condiciones de salida. 

Todo algoritmo recursivo puede ser implementado en forma iterativa utilizando una pila. 


5 , 7 . 1, Atgorítmos recursivos 

El algoritmo de Ordenación Rápida (Quick Sort) tiene una definición recursiva, Ordena un array divi- 
diéndolo en dos particíones más pequenas del mismo, de forma que todos los elementos de una de ellas 
son menores que cada uno de los de la segunda y todos los de la otra mayores que cada uno de los de la 
prìmera. Estas particiones se subdividirán por separado hasta obtener particioncs dc un sólo elemento, 
terminación del proceso recursivo. Este algoritmo se desarrollará más adelante, cuando se trate el 
apartado de ordenación intema. 

La forma iterativa de este algoritmo se verá en el capítulo que estudia los métodos de ordenación 
intema* Dejamos al lector la comparación entre dicha forma iterativa y la recursiva que aparece desa- 
rrollada en los ejercicios del presente capítulo. 

E1 problema de las Torres de Hanoi es un problema clásico de recursión. Se tienen 3 torres y un 
conjunto de discos de diferentes tamanos. Cada disco tiene una perforación en el centro que le permite 
ensartarse en cuaiquiera de las torres. Los discos han de encontrarse siempre situados en alguna de las 
torres. Inìcialmente todos están en la misma torre, ordenados de mayor a menor, como se muestra en el 
dibujo. Se deben averiguar los movitnientos necesarios para pasar todos los discos a otra tonre, utili- 
zando la tercera como auxiliar y cumpliendo las siguientes reglas: 

* En cada movimiento sólo puede intervenir un disco. 

* No puede quedar un disco sobre otro de menor tamaho. 

Origen Destino Auxiliar 

1 



2 


3 
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Para N = 3 la soluciôn del problema implicaría los siguientes movimíentos 

1- De 1 a 2 

2. De 1 a 3 

3. De 2 a 3 

4. De 1 a 2 

5. De 3 a 1 

6. De 3 a 2 

7. De I a 2 

algor i tmo Hano i 
var 

entero : n 
inicio 

escribir { 'N B àe discos : ' ) 

leer (n) 

llamar_a Mover_torre (n, 1 , 2 , 3 ) 

f in 

procedimlento Mover_torre ( E entero: N ; E entero: orig, dest , aux) 

inicio 

si N = 1 entonces 

eacribir { 'Paso de orig, ' a ', dest ) 

si_no 

llamar_a Mover_torre ( N-1 , orìg, aux, dest ) 

eecribir ( ' Paso de ', A, J a ', B ) 

llamar_a Mover_torre ( N-1 , aux, dest , orìg ) 

f in_ei 

f i n_p r o c ed imi en t o 

5.7,2, Algoritmos con retroceso 

Hay un gran número de problemas cuya solucíón no puede obtenerse mediante una seríe de cálculos 
más o menos complejos y su resolucìón requiere la aplicación de métodos de tanteo de forma sistemá- 
tica, es decir ir probando todas las opciones posibles. Existen dos posibilidades: que la opción escogida 
forme parte de la solución buscada o que no, en cuyo caso se retrocederá para probar con otra posible 
opción. En estos problemas resulta muy útil la recursividad. 

Un ejemplo de este tipo es el problema de las ocho reinas, que consiste en disponer ocho reinas en 
un tablero de ajedrez de tal foima que no se amenacen entre sí (recuerde que una reina amenaza a las 
piezas situadas en su misma fila, columna o diagonat). La tarea más ìmportante a realizar en este 
algoritmo, cuyo pseudocódigo se ìncluye en un ejercicio al fmal de este capítulo, es seleccionar adecua- 
damente la estructura de datos para representar el problema y los parámetros de los procedimientos 
recursivos. 
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5.8. Ejercicios resueltos 


5.1. Realizar un procedimiento que permita intercambiar eï vaïor de dos variabies. 


Análisis det Problema 

Para ìntercambiar el contenido de dos variables, es necesaria una variable auxiliar, del mismo tipo de 
datos que las otras variables. Se pasan como parámetros de entrada las dos variables cuyo valor se desea 
intercambiar. Ya que su valor será modificado durante la ejecución del subalgoritmo, serán parámetros 
de entrada/salida y el subalgoritmo será un procedimiento. 


Diseno del algoritmo 

procedimiento Intercambio (E/S entero : a, b) 

ver 

entero : aux 
inicio 
aux *- a 
a — b 
b aux 
f i njpr oc e dimì en t o 

Este pmcedimiento sólo serviría para intercambiar variables de tipo entero. Se podría hacer un 
procedimiento más genérico utilizando un tipo de datos abstracto. En la cabecera del programa princi- 
pal podemos definir un tipo de datos TìpoDatos de la forma 

tipo 

TipoDatos = * . . * // tipo de datos de las variables 
// a íntercambiar 

y modifîcar la cabecera det procedimiento, 

procedimiento Intercambio (E/S TipoDatos : a, b) 

var 

TipoDatos ; aux 

5.2. Realizar unafimciòn no recurstva que permita obtener el térmîno n de la serie de Fibonaccì. 


Anátísis del problema 

La serie de Fíbonacci se defíne como: 

Fibonacci^ = Fibonacci^ ^ + Fibonacci n para todo n > 1 

para n <= 1 , Fibonacci n = 1 . 
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Por lo tanto se deben snmar los elementos mediante un bucle que debe ejecutarse desde 2 hasta n. 
Cada iteración debe guardar el último y el penúitimo término, para io que se utilìzan dos variables 
último y penúltimo, a las que irán cambiando sus valores, E1 subalgoritmo aceptará una como 
entrada una variable entera y devolverá un valor también entero, por lo que deberemos utilìzar una 
función. 


Disetio âel algoritmo 

entero función Fíbonacci(E etitero : n) 
var 

entero : i, ultimo, penúltimo, suma 

inicio 

suma «- 1 

último 4 - 1 
pendltimo 4 - 1 

desde i <- 2 heeta n hacer 

penúltimo «- último 

ultimo 4- suma 

suma +- último + penúltimo 

fin_desde 
devolver ( suma ) 
f in_función 


5,3, împlementar unajuncìôn que pevmìîa devolver un vctlor entero, leido desde teclado , compren- 
dido entre dos îímiies que iníroduciremos como parâmetro. 

Anâlisis de problema 

Esta fíinción puede ser utìl para validar una entrada de datos de tipo entero y se podrá incluir en otros 
algoritmos* Consistirá simplemente en un bucie repetir que ejecutará la lectura de un dato hasta que 
esté entre ios valores que se han pasado como parámetros de entrada. 


Diseno del algoritmo 

entero función ValidarEntero (E entero : inferior, superior) 

var 

entero : n 
inicio 
repetir 
leer (n) 

hasta_gue n >= inferior y n <= superior 

devoiver (n) 
f in_función 



Subprogramas (subalgorïtmos), procedimierìtos y funciones 91 


Los parámetros ínf erior y superior deberán pasarse en dicho orden; es decír, primero el 
menor y luego el mayor, aunque con una pequena modificación podrían pasarse en cualquier orden. 
Para ello debería incluirse una condición antes de comenzar el bucle que ? de ser necesario, haría una 
llamada al procedimiento Intercambio, ya desarrollado: 


si inferior > superior entoncee 
Intercambio (inferior, superior) 

f in_si 


5.4. Disenar una juncìón gue permìta obtener ei vaior absoluto de un número. 

Análisis del problema 

Ei valor absoluto de un numero positìvo, sería el mismo número; de un número negativo sería el mismo 
número sin el sìgno y de 0 es 0. Por lo tanto, esta función, únìcamente debería multiplicar por -1 ei 
número pasado como parámetro de entrada en el caso que éste fuera menor que 0, 


Diseno del algoritmo 


entero funciótl Abs (E entero : n) 
inicio 

si n < 0 entonces 
devolver (n * -1 ) 
si m no 

devolver (n) 
f in_ei 
fin_función 


Esta función sólo es válida para números enteros* Para que valiera con algún otro tipo de dato 
\ numérico, deberíamos utilizar un tipo de dato abstracto. 

[. 5.5. Reaiizar un procedimiento que obtenga ia dîvìsìón entera y ei resto de îa misma utìlìzando 
únicamente los operadores suma y resta. 


Análisis del problema 

La división se puede considerar como una sucesión de restas. E1 algoritmo trata de contar cuántas veces 
se puede restar el divisor al dividendo y dicho contador sería el cociente. Cuando ya no se pueda restar 
más sin que salga un número positivo, se tendrá el resto. 
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Por lo tanto se tienen dos parámetros de entrada, dìvidendo y divisor, y dos de salida, 
cociente y resto. cociente será un contador cpie se incrementará en 1 cada vez que se pueda 
restar el divisor al dividendo. E1 bucle a utilizar será de tipo mientras, ya que puede darse el 
caso que no se ejecute nìnguna vez, en cuyo caso el cociente será 0 y el resto será el dividendo. 


Disefto del algoritmo 

pr ocedimi en t o DivisiónEntera ( B entero : dividendo , divisor ; 

S entero : cociente, resto) 

inicìo 

cociente *- 0 

mientras dîvidendo => divisor hncer 
dividendo *- dìvidendo - divísor 
cociente «- cociente + 1 

fin_mientraa 
resto *- dividendo 

f in_proc edìmìent o 


5.ÒL Disenar un procedimiento que permìta convertir coordenadas polares ( radio t ánguîo) en 
cartesianas (x t y) 

x = radìo * cos(ánguìo) 
y = radio * sen(ánguìo) 

Anátísis del probtema 

La resotución requiere aplicar la fórmula indicada más arriba* Habrá que tener en cuenta el tipo de 
parámetros. radio y ángulo serán de entrada y x e y de salida* 


DiseAo del algoritmo 

pr ocediml ent o Polares ( B real : ángulo, radio ; S real : x, y ) 
iniclo 

x «- radio * coô(ángulo) 
y 4 - radio * sen(ángulo) 

f in_pr ocedimient o 


5, 7, Dìsene unafunción que permita obtener elfactorìai de un número entero positivo. 
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Anâlisis del problema 

E1 factoríal de n se puede definÍT para cualquier entero positivo como 

Factorial - n * n-1 * n-2 * * 1' 

n 

por defmicióiij Factorial 0 = 1 

Por lo tanto para implementar un función Factorialj se deberá realizar un bucle que se ejecute 
entre 2 y n f acjumulando en su cuerpo las sucesivas multiplicaciones. 


Diseno del algoritmo 

entero función Factorial ( E entero : n) 
var 

entero : i , f 
inicio 

f <- 1 

desde i «- 2 hasta n hacer 
f f * i 
fin_deade 
devolver ( f } 
fin_función 


5.8. Disenar una funcìòn que permìta obtener el môxìmo común divisor de dos números medìante el 

algoritmo de Euclides. 

Análisis del problema 

Para obtener el máximo común divisor de dos números enteros positivos a y b según el algoritmo de 
Euclides, se debe ejecutar un bucle que divida a entre b. Sí el resto es 0, b será el divisor; en caso 
contrario, a tomará el valor de b y b el del resto de la división anterìor. E1 bucle finalizará cuando el 
resto sea 0, es decìr s cuando a sea divisible entre b. 


Diseiio del algorítmo 

entero función Mcd (E entero :a,b) 
var 

entero : resto 
Iniclo 

mientras a mod b <> 0 hacer 

resto 4- a mod b 

a b 

b *- resto 

fin_mientraa 
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devolver ( b ) 
f in_función 

5,9, Realizar una función que permita saber si una fecha es válida. 


Anâlisis del problema 

Esta función es muy normal en cualquier aplicación informática* Se trata de ver si una fecha, introdu- 
cida como mes , dia y aho es una fecha correcta; es decir s el día lia de estar comprendido entre 1 y 3 1, el 
mes entre 1 y 12 f y, si esto es correcto ? ver si el número de dias para un mes concreto es válido. 

E1 tipo de la función será un valor lógico, verdadero si la fecha es correcta o falso si es errónea. 
Como ayuda, se utilizaráuna función EsBìsìestOj a la que se pasará el valor entero correspondiente 
a un ano determinado y devolverá un valor lógico verdadero si el aho el bisiesto y falso en caso contra- 
rio, Un aho será bisiesto si es divisible por 4, excepto los que son divisibles por 100 pero no por 400, es 
decir, menos aquellos con los que comienza el siglo. Un diseno modular de la función podría ser por 
tanto: 



Fecha 

Válida 



Diseno del algorìtmo 

lógico función FechaVálîda (E entero : ddfirïm^aa) 

inicio 

FechaVálida «- verdad 

si (mm < 1) o (mm > 12) entonces 
devolver (falso ) 
si_no 

si dd < 1 entonces 
devolver ( falso) 
si_no 

según_sea mm hacer 

4,6,9,11 \ si dd > 30 entonces 
devolver ( falso) 
f in_si 

2 : ei Esbisiesto(aa) y {dd > 29) 

devolver ( f also ) 


entonces 
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ei_no 

si no Esbísiesto (aa) y {dd > 28) entonces 
devolver { falso) 

f in_sl 

fin_si 

ei_no 

si dd > 31 entoncee 
devolver (falso ) 
f in_si 
fin_según 
f in_si 
fin_si 
f in_función 

lógico funcìón EsBisíesto{E entero : aa) 

inicio 

devolver((aa mod 4 = û) y (aa mod 100 <> 0) o (aa mod 400 = 0)) 

fin_funci6n 


5,19. Implementar una funcìôn que permita hallar eî valor de X y t sìendo X un número real e y un 
entero. 

Análisis del problema 

Se trata de una función similar a la del factorial, pues se trata de acumular multiplicaciones, pues 
debemos multiplicar X por sí mismo y veces. Si y es negativo, X es igual a su inversa. 


Diseho del algoritmo 


real función Potenciaí E entero : x,y) 

var 

entero : í , p 

inicio 

P 1 

desde i 1 hasta abs(y) hacer 
p «“ p * x 
fia_desde 
si y < 0 entonces 
devolver(p) 
si_no 

devolver (1/p) 
f in_si 
fin_función 

5, IL Realizar tres funcìones que permitan haìlar el valor de & mediante las sertes matemàticas 
siguientes: 
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a) 7i 




b) 




24 24 

4 2 + Ŷ 




c) 7t 


2 4 4 6 6 8 

4 ... 

3 3 5 5 7 7 


Laprecisìón deî cálcuîo dependerá deï número de elementos de ía serîe, n, que serâ un parâmetro 
que se pase a îa junción . 


Análisîs del problema 

En cualquiera de los tres casos se debe implementar un bucle que se ejecute n veces y en el que se irá 
acumulando la suma de los términos de la serie, 

En ei caso (a), los términos pares suman y los impares restan, por lo que será preciso hacer una 
distinción. E1 numerudor siempre es i, y el denominador son los n primeros números impares, En el 
caso {b\ el numerador es 24 y el denomìnador será el cuadrado de la variable del bucle. E1 resultado 
final será la raíz cuadrada de la serie. En el caso (c) lo que se debe acumular son los productos; el 
numerador serán los números pares y el denominador los ímpares. 

Diseno del algontmo 

(a) 

real función Pi( ïï entero : n) 
var 

real : seríe 
antero : i , denom 
lógico : par 
inicio 

dèrLom «- 1 
serie 0 
par falso 

desde i *- 1 baeta n hacer 
ei par entonces 

serie «- serie - 1 / denorti 

fli_np 

serie «- serie + 1 / denom 

fin_si 

par «- no par 
denom — denom + 2 

fin_desde 

davolver ( serie * 4 ) 
fin_función 


Subprogramaa (subalgoritmos), procadirnrentos y funcfones 97 


(b) 

real función Pi(H entero : n) 
var 

real : serie 
entero : i 
inicio 

serie *- 0 

desde i «- 1 hasta n hacer 

serie serie + 24 / i A 2 

fin_desde 

devolver(ral^2 (serie) / 2) 
f in_función 


(b) 

real función Pi (E entero : n) 
var 

real : seríe 
entero t í 
inicio 

serie ♦** 2 

deede i — 1 hasta n hacer 
s± i mod 2-0 entonces 

serie serie * i / (i + 1) 

si_no • 

. serie seri-e. * (1 + 1) / i 

fin_si 
fin_desde 
devolver (seríe) 
fin_función 


5.12. Realizar un subprograma que calcule ïa suma de los divisores de n distintos de n. 


Análisìs del problema 

Para obtener los divísores del número entero n, será preciso hacer un bucle en el que un contador se irá 
decrementando desde n - 1 hasta 1 . Por cada ìteración, se comprobará si el contador es divisor de n, 
Como el prìmer divisor que podemos encontrar será n/2, el valor inicial del contador podrá ser n 
div 2 , 

E1 tipo de subprograma deberá ser una función, a la quepasaríamos como parámetro de entrada el 
número n. 


Diseno del algorìtmo 

entcro función SumaDivisor (E entôro : n) 
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var 

entaro : suma, i 
inicio 

suma ^ 0 

dasde i — n div 2 haeta 1 incremento -1 hacer 
si n iftod i = 0 entonces 
suma — suma + ì 
fin_si 
fin_desde 
devolver ( suma) 
f in_función 

5*13. Dos nùmeros son amigos, sì cada uno de ellos es igual a la suma de los dìvìsores deí otro ♦ 
Por ejempîo t 220 y 284 son amigos, ya que: 

Suma de divisores de 284 : 1+2+4+71+142 = 220 

Suma de divisores de 220: 1+2+4+5+10+11 +20+22+44+55+110 = 284 

Diserie un algorìtmo que muestre todas las parejas de números amigos menores o iguales 
que m, siendo m un nùmero introducìdo por teclado. 


Anátisìs del problema 

Este algoritmo se puede descomponer en tres partes diferenciadas. Por una parte un programa princi- 
pal que debe ir sacando todas las parejas de números mayores o iguales a un número m que previamente 
habremos introducido por teclado. Desde ahí se llamará a una función lógica SonAmìgos que dirá si 
la pareja de números son amigos. Para hacer esto ? se calcula la suma de los divisoresj para ìo que 
llamaremos a la función SumaDivisor, desarrollada más arriba. Por lo tanto un disefio modular del 
programa podría ser como sigue: 



E1 programa principal leerá el número m, e implementará dos bucles anidados para sacar las 
parejas menores o iguales que m. Para ello, un primer bucle realizará la iteraciones de i entre I y m, 
mientras que el bucle interno irá tomando valores entre i+1 y m. Dentro del bucle habrá una llamada 
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a la función SonAmigos, y si ésta devuelve un valor verdadero escribiremos la pareja, La fìmción 
SonAmìgos se encarga de comprobar si una pareja de números son amigos, Recibe dos parámetros de 
entrada, y guarda en dos variables la suma de sus divisores mediante la función SumaDìvisor, Si 
ambas sumas son iguales, devolverá un valor verdadero; en caso contrario, falso. 


Diseno det algoritmo 

algoritmo e j ercicio_5_13 

var 

entero : i , j , m 
inicio 
leer (m) 

deaâe i «- 1 basta m^l hàcer 
desde j ì+1 hasta m hacer 

si SonAmigos (ì , j ) entonces 
escribiríi, j ) 
f in_si 
fin_desde 
f in_desde 
fin' 

lógico función SonAmigos( E entero : n,m) 
iniclo 

■ devòivér ( ('SumaDivisor (n) ■ = m) y ( SumaDivìsor (m) = n) 

fin_función ■ 

5*14* El númera de combinaciones de m elementos tomados de n en n es: 


m 


m\ 


n) n\(m — n) 

Dìsenar una función que permita calcular el número combinatorio [ — 

L n 


Ánálisis 4el problema 

La fìmción se reduce a una simple asignadón, siempre que se tenga resuelto el problema de hallar el 
factorial, cuya ftmción ya se ha diseíiado más arriba. Por lo tanto se limitará a codificar la expresión del 
número combinatorio* 


DiseUo del algoritmo 

enterò función Combinatorio (E entero : m, n) 
inicio 

devolver (Factorial (m) div Factorial(n) * Factorial(m - n) ) 

f in_función 
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5*15. împlemente tres funciones que permitan averiguar tos valores de e 1 , cosfx) y sen(x) a parîir 
de las series siguientes; 


x 2 . x 3 


e* = Y — = 1 + x + — + — +... 

4i /'! 2! 3! 

1=1 

» Jl ó 

, . „ X * X X X 

cos(jc) = 1+ > (— 1) = 1 1 1-.** 

7 Z^ v (2i)\ 7» 4í 


i=1 


sen(x) = ^ (“ 1) -f 

J=\ \ lz 


,2í+l 


(2/ + 1)! 


3 5 7 

X X X . 

— x 1 +... 

3! 5! 7! 


Eî número de térmìnos de ïa serie serâ eì suficiente para que la diferencia ahsoluta entre 
dos valores sucesivos sea menor 10~ 3 . 


Análisis del problema 

En ambos casos se trata de hacer un bucle que se ejecute hasta que el valor absoluto de la diferencia 
entre el último y el penúitimo ténnino seamenor que O.OOL Dentro del bucle ìiabrá un acumulador que 
sume cada uno de los términos. 

Paia el caso de e* s en cada téimìno el numerador será x eievado ai número de orden del término, 
mientras que et denominador será el factoriai del número de orden dei término. E1 contador del bucle 
por lo tanto irá tomando valores entre 1 y n. 

Para cos(x) f el numerador irá elevando x a las potencias pares, mientras que ei denomínador será 
el factoriai de los números pares. Por lo tanto el contador del bucle irá sacando los números pares. 
Además, en él ios términos de orden par restan, mientras que los de orden impar suman. 

Por último, para sen(x) t la diferencia estriba en que la potencia y el factorial serian de los núme- 
ros impares, por lo que el contador del bucie sacará los número impares. 

En los tres casos, como se ha dicho más arriba, tendremos que utiiizar una variable suma que 
acumulará ei valor de la serie, un contador, con las características que se han indicado y dos variabtes 
reales para guardar el ultimo y el penultimo término, para ver si la diferencia entre ambos es menor que 
0 . 001 . 


DiseAo del algoritmo 


real función exponentei E entero : x) 
var 

entero : ì 

real : snjna, último, término 

inicio 
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suma «- 1 + x 

i - 1 

término x 

repetir 

ì «- i + 1 

último *- término 

término — x^i / Factorial ( i ) 

suma suma +■ término 

hasta_que ábs ( término - úl t imo ) < 
devolver ( suma ) 
fin_función 

cos(x) 

real función cos ( E entero : x ) 
var 

entero : i 

real : suma, últìmo, término 
lógico :par 
inicio 

suma 1 
térmîno 1 
i *- 0 

par «- verdad 
repetir 

i i + 2 

último término 

término «- x A i / Factorial(i) 

si par entonees 

suma — suma - término 

si_no 

suma *- suma + término 

f in_si 

par *- no par 

hasta_que absítérmino - último) < 

devolver(suma) 

fin_función 

senfx) 

real función sen( E entero : x) 
var 

entero : i 

real : suma, último, término 

lógico : par 
inicio 


0.001 


0.001 


suma 


x 
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término x 
i - 1 

par «- verdad 
repetir 

ì i + 2 

últìmo término 

término x A i / Factorial(i) 

si par entonces 

snma suma - término 

si_no 

suma *- suma + término 

f in_si 

par no par 

hasta_<iue abeítérmìno - último) < 0.001 
devolver ( suma ) 
f in_función 


5.16* Implementar una fitnción Redondeo (a f b) , que devuelva ei nùmero real a redondeado a b 
decimales. 


Análisis del problema 

Para redondear un número real a a b decimales -siendo b un número entero posìtivo— » hay que recurrir 
a la función estándar ent que elìmina los decimales de un número reaL Si se quiere dejar una serie de 
deciniales, hay que obtener el entero de la multiplícación del número a por 10 b y dividir el resultado 
por 10 b . De esta forma, el resultado s siendo a= 3 + 546 y 4=2, sería: 

ent {3 . 546*100) /100 = ent { 354 . 6 ) /100 = 354/100 = 3,54 . 

Con esto se consigue truncar, no redondear. Para redondear, de forma que hasta 0.5 Tedondee por 
defecto y a partir de ahí por exceso, se debe sumar a la multiplicación 0.5: 

ent (3.546*100 + 0.5) /100 = eiit (3 54 . 6 + 0 . 5 ) /100 - 
ent (355.1) /100 = 355/100 = 3,55 

Para realizar esta función, únicamente se ha de aplicar la expresión anterior. 


Diseho del algoritmo 

entero función Eedondeo ( E rea.1 : a ; E entero : b) 
inicio 

devolver (ent (a * 10 A b + 0.5) / 10 A b) 

f in_función 
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5.17, Algoritmo que transforma un número ìntroducido por teciado en notación decìmal a roma ■ 
na. Eî número será entero y positivo y no excederâ de 3000. 


Análisis del problema 

Para pasar un número desáe notáción decimal a romana se transformará indivìdualmente cada uno de 
sus dígitos* E1 procedimiento para transformar un dígito es siempre el mismo 

Dígito Escrìbir 

de 1 a 3 dé 1 a 3 veces pl 
4 pl seguido de p2 

de 5 a 8 p2 seguido por, de 0 a 3 veces* ; pl : 

9 pl y a continuación p3 


Tenga en cuenta que, en las distintas llamadas que se realizan al procedimiento, se pasarán diferen' 
tes parámetros: 



Parámetro 1 (pl) 

Parámetro 2 (p2) '■ 

Parâmetro 3 (p3) 

Unidades 

' I' 

1 v r 

'X' / 7 ; ... 

Decenas 

'X' 

1 L r 

' C ' 

Centenas 

1 C ' 

r D f 

'M' 

Miles 

'M' 

t t 



Dìsehodelalgçritmo 

alfloritmo Ejercìcio^5^17- - 

var 

entero : n, r f dígito 
inicio 
repetir 

eecribir-í 'Deme rnjmero ') 

' leer (n) 

•• 'hastá_<rie' - {n ">=. 0 )• y (n <~'3Ç'0O'5' • 
r •'«- n' ■ 'j'- 

dígîto «- r div 1000 
r «- r mod 1000 

calccifrarom{dígito, 'M', 1 ') 

dígito — r d.iv 100 
r ^ r mod 100 

calccif rarom{dígito, 'C 1 , 'D’ , 

dígito — r div 10 


'M’ ) 
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r r mod 10 

calccif rarom (dígito, 'X', 'L 1 , 'C') 

dígito ** r 

calccif raromtdígito, r I 1 , ’V', r X') 

fin 

procôdimiônto calccifrarom (E ôntero: dígito ; E caracter: pl, p2 , p3) 

var 

entero : j 
iniclo 

si dígito = 9 entoncea 
eecribir ( pl , p3 ) 
ôi_no 

ai dígìto > 4 entoncea 
eecribir (p2) 

de&de j — 1 haata dígito - 5 hacer 
eacribir( pl) 
f in_deade 
ei_no 

ai dígito - 4 etitoncée 
escribìr ( pl , p2 ) 
ai_no 

deade j — 1 hasta dígíto hacer 
eecribìr(pl) 

£in_desde 

fin_ei 

fin_ei 

fin_sl 

f i n_pr ocedimi en t o 


5.18. Escribir imajuncîón, INTEGRÀL, que devueìva el área del recìnîo formado por el eje dé îas 
X, las rectaS x-a y x-b y el arco de curva correspondiente a una junción contìnua, recibida 
como parámetro, con vaíores positivos en el ìntervalo consìderado , 


Análisis de problema 

La fimción integral dividirá el intervalo [a,b] en n subintervalos y considerará n rectángulos con 
esas bases y cuyas alturas sean el valor de la fimción recibida como parámetro, en el punto medio 
de los subintervalos* La suma de las áreas de todos estos rectangulos constituirá el valor devuelto por 
integral- 

// tipo real función(E real : x) ; func 

real función ìntegral (E func : f ; E real : a, b ; E entero ; n) 
var 

reai : baserectángulo, altura, x, s 

entero : i 
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inioio 

baserectángulo +- (b a) / n 
x +- a +■ baserectángulo/2 
s 0 

deade i «- 1 haete n heoer 

altura +- f (x) 

s s + baserectángulo * altura 

x x + baserectángulo 

fin_desde 
devolver (s) 
f in_función 

5*19. Escrìbir una funciôn recursiva que calcuîe èï factorìal de un nùmèro eìitero posìtivo. 


Análísis del problema 

E1 factorial de un número entero positivo n se puede defrnir como: 

ní - n * n'-lí 

para cualquiernúmero mayor queuno, ya que 1! - 1 y 0! = 0. Por lo tanto la condición de salida de la 
llamada recursíva será cuando n sea menor o igual que 1 , 


Disefío det aígoritmo 


entero funclón fact (E entero : n) 
inicio 

ai n = 0 entonces 
devolver ( 1 ) 
si_no 

devolver (n * f act (n-1 ) ) 

f±n_ei 
fin función 


5.20 . Escrìba una funcìòn recursiva que calcule la potencìa de un númem entero posìtìvo. 


Análìsìs del problema 

Una definición recursiva de x y para dos números enteros positivos es la siguiente: 

x y = x * x *- 1 

(x? es 1. Esa será la condición de salida de las Uamadas recursivas). 



1Q6 Fundamento^deProgramaciónXìbrodeProblemas 

Diseno del algoritmo 

entero función pot(E entero : x , v' , 
inicio 

si y = 0 entoncea 
dovolveríl) 
si_no 

devolver (x * pot (x f y-l ) 

f in_si 
f in_función 

5,21, Escribir Una juncìón recursiva que calcule eí término n de îa serie de FibonaccL 

Análìsis del problema 

La serie de Fibonaçci es la siguiente, 

1 1 2 3.5 8 13 21 34... 

es deeir, cada iiúnie!ró es la suma de los dos aiîterioreSji con excepcìón de los dos primeros* que siempre 
son 1. Por lo tanto también podemos hacer una defmición reeursiva para averiguar el término n de la 
serie, puesto que 

Fib = Fib . + Fìb 

n n-1 n-ii 

para cualquier n mayor que 2. 

Diseno del algoritmo 

entsro función Fib(E entero : n) 
inicio 

si n = Q ò n = 1 entonces 
devolver (1} 
si_no 

devolver (Fib (n-1 ) + Fib (n-2 ) 

fin_ei 

fin función T i 


5,22, Escrìbìr un procedìtnìento recursivo que escrìba un número en base 10 convertido a otra 
base entre 2 y P. 

Análisis del problema 

Para convertir un número decimal a otra bàse sc debe dividir el numero entre la base, y repetir el 
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proceso, haciendo que el dividendo sea el cociente de la siguiente división hasta que éste sea menor que 
la base + En ese momento, se recogen todos los restos y el último cociente en orden inverso a como han 
salido. 

Este ejemplo es una muestra de cómo puede ser útîl la recursividad cuando se trata de un proceso 
que debe recoger los resultados en orden inverso a como han salido. Para simplificar el ejercicio se ha 
limitado la base a 9, de forma que se evite tener que convertir los restos en letras. 

Diseno del algoritmo 

procodìmiento convierte (B ©ntero : n, b) 
inicio 

ei n >= b entonces 

convíertetn div b, b) 

fin_si 

escribirín mod b) 
f ìn_función 


$ 23* Disenar un algoritmo que resueîva ei problema de ias ocho retnas. 


Análisis del problema 

E1 problema consiste en colocar las 8 damas dentro del tablero de ajedrez sin que se coman unas a otras, 
en general, se tratará de poner n damas en un tablero de n x n. 

En vez de colocar las damas en un array * de n x n elementos, se utiliza un vector de n eiementos. 
Cada elemento del vector representa la fiia donde está la reina. E1 contenido representa la columiia. 

E1 vector Dairias se inícíaliza a 0. Para buscar la siguiente solución se comienza situando en 
Damas [ 1 ] un 1 (la primera dama está en la primera fila, columna l) v La siguiqnte dama estará en ìa 
fila 2 y empezamos a buscar en la posición 1. No será una posición válida si Damas [ 1 ] = Damas [ 2 ] 
(están en la misma columna); Damas [ 1] +1 = Damas [2 ] + 2 (están en una diagonal) y Damas [1] - 
1 = Damas [2 ] - 2 (está en la otra diagonai). Si esto ocurre, incrementamos la columna de la nueva 
dama y se volverá a comprobar. 


Diseno del algoritmo 

algoritmo E jericio_5_24 
conet n = 8 

tipos array de enteroí 1 . . n] : ListaDamas 


* Ei concepio de array se verâ en el capítulo siguìente. 
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var 

ListaDamas : D 

entero : i 
lógiCO : solución 

inicio 

// Inícializar el array 

desde ì — 1 haeta n hacer 

d[i] - 0 

fin_desde 

Ensayar (d, 1 f solución) 
si no solución entonces 

escribir [ J No hay solución' ï 

sì_no 

// se deja al lector hacer la presentac: 

f in_si 
fin 

lógìco función PosiciónVálidaíE ListaDamas d 

var 

entero : j 
lógico : válìda 
inicio 

válida verdad 

desde j — 1 hasta i - 1 hacer 

// Ho se ataca en la columna 
válida válida y (d[ij <> d[j]) 

// no se ataca en una diagonal 
válida *- válida y (d[i] +■ í <> d [ j ] + j 
// no se ataca en la otra diagonal 
válida «- válida y (d[i] - i <> d [ j ] - j 

f in_desde 
devolver (Válida) 
fin_función 

procedimiento Ensayar ( E/S ListaDamas : d ; E 

S lógico : Solución) 

inicio 

si i = n + 1 entonces 

solucíón «- verdad 
si_no 

solución <- fa.leo 
repetir 

d[i] - d[i] + 1 
si PosiciónVálida (d, i ) entonces 
Ensayar (d,i+l,solución) 
hasta_gue solución o ( d ( i ] = n) 

sì no solucìón entonces 
d[ij - 0 
f in_si 
f in_si 

f i n_jpr o c e d irai e n t o 


on del resultado 

E entero : i) 


) 

) 

entero : i t 



Estructuras de datos (arrays 

y registros) 


6.1. Datos estructurados 

Una estructura de datos es una coìección de datos que se caracterizan por su organización y las opera- 
ciones que se definen en ella* Los datos de tipo estándar pueden ser organizados en diferentes estructu- 
ras de datos: estátìcas y dinámicas. 

Las estructuras de datos estáticas son aquellas en las que el espacìo ocupado en memoria se define 
en tiempo de compilación y no puede ser modificado durante la ejecución del programa; por el contra- 
rio, en las estructuras de datos dlnámicas el espacio ocupado en memoria puede ser modificado en 
tiempo de ejecución* Estructuras de datos estáticas son los arrays y los registros y las estructuras diná- 
mícas son listas, árboles y grafos (estas estructuras no son soportadas en todos los lenguajes). 

La elección de la estructura de datos idónea dependerá de la naturaleza del problema a resolver y, 
en menor medida, del lenguaje, Las estructuras de datos tienen en común que un identificador, nombre, 
puede representar a múltiples datos indivìduales. 

6.2. Arrays* 

Un array es una colección de datos del mismo tipo, que se almacenan en posiciones consecutivas de 
memoria y reciben un nombre común. Para referirse a un determinado elemento de un array se deberá 


* En Lannoamérica, eí termino inglés array, se suele traducir casi sìempre por la palabra arreglo. 
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utilizar un índice ? que especifique su posición relativa en el array, Los arrays podrán ser 

* Unìdimensionales ? también llamados Vectores 

■ Bidimensionales, denominados Tablas o Matrices 

• Multidimensionales, con tres o más dimensiones 


alemento 1 
elemento 2 
elemento 3 


elemento m 


elemento 1 P 1 


elemento 1,n 

elemento 2,1 


elemento 2,n 

elemento 3,1 


elemento 3,n 




elemento m,1 


elemento m,n 


Array unidimensional 


Array bidimenaìonal 






f " " 

elemento 1,1,1 

£ — 

elemento 1,n,1 

elemento 2,1,1 


elemento 2,n p 1 

elemento 3,1,1 


elemento 3,n,1 



■Ml 

elementom,1,1 


elemento m P n,1| 






Array trldimensional 

Puesto que la memoria de la computadora es lineal, sea el array del tipo que sea, deberá estar 
linealizado para su disposición en el almacenamiento. 


6.2. 7 . Arrays unidimensionales 

Todo dato que se vaya a utilizar en un algoritmo ha de haber sido previamente declarado. Los arrays no 
son una excepción y lo primero que se debe hacer es crear el tipo, para luego poder declarar datos de 
dicho tipo. 

A1 ser un tipo estructurado ? la declaración se hará en función de otro tipo estándar o previamente 
definido, al que se denominará tipo base, por ser todos los elementos constituyentes de la estructura del 
mismo tipo, 

tipo 

array [<límìnf > . , <limsup>] de < : <nomhre_d.el^tipo> 

var 

<nombre_ôel_ t ìpo> : <nombre_del_vector> 

E1 número de elementos del vector vendrá dado por la fórmula 
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<Iimsup> - <liminf> + 1 

Todos los elementos del vector podrán seleccionarse arbitrariamente y serán igualmente accesi- 
bles* Se les referenciará empleando un índice que senale su posicióh relatìva dentro del vecton Si 
<nombre_âel_vector> fueravect al elemento enésimo del array se lereferenciaríaporvect [n] ? 
siendo n un valor situado entre ei límite inferior y el límite superior. Los elementos podrán ser proce- 
sados como cualquier otra variable que fuera de dicho tipo_base. 


6.2.2 . Arrays bidimensionales 

También se les denomìna matrìces o tabîas . Un anay bidimensional es un vector de vectores. Es por 
tanto un conjunto de elementos del mismo tipo en el que el orden de los componentes es significativo y 
en el que se necesitan especificar dos subíndíces para poder identificar a cada elemento del array. 


1 2 ... 1 j 


7,5 

2,3 



3,4 

6,3 



... 


... 





m[i,j 


Su declaración se haría de ia siguiente forma: 
tipo 

arraytlJrîf. , lSup f linf . . Jsup] de tipo_basei nombre_del_típo 

var 

<noinbre_del_tipo > : <nombre_óe_la_matri z> 

que aplicado a la matriz dibujada más arriba sería: 
tipo 

array [ 1 . . F f 1 . . C) dé real : mátriz 

//F y C habrán sido declaradas- prêviamente como constantes 

var 

matriz: m 

La referencia a un determinado elemento de la matriz, requiere el empleo de un primer subíndice 
que indique la fila y un segundo subíndice que marque la columna. 

Los elementos, podrán ser procesados como cualquìer otra variable de tipo real. E1 número 
de elementos de la matriz vendrá dado por la fórmula 

(F - 1 + 1) * (C - 1 + 1) 
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6.2.3 . fíecorrído de todos tos etementos det erray 

E1 recorrido de los elementos de un array se realizará utilizando estructuras repetitìvas, con las que 
manejaremos los subíndices del array. Si se trata de un vector ? bastará con una estructura repetìtiva. 
Para el recoirido de una matriz o tabla se necesitarán dos estructuras repetitivas anidadas, una que 
controie las fìias y otra las columnas. Además ? en las matrices se consideran dos posibilidades: 


Recorrido por ftlas 

Supuestas las siguientes declaraciones 
const 

F = <valorl> 

C = <valor2> 

t ipo 

array[l..F ( 1..C] de real ; matriz 
var 

matriz: m 

y que todos los elementos de la matriz contienen información válìda, escribir ei pseudocódigo para que 
se visualice primero el contenido de los elementos de la primera fila, a continuación el contenido de los 
de la segunda, etc. 

d©sde i — 1 haeta F hacer 
deedô j «- 1 haeta C hacer 
escrîblr {m[i , j ] ) 
f in_desde 
f in_deede 


Recorrido por columnas 

Tal y como aparece a continuación, se mostrará prìmero el contenido de los elementos de la primeïa 
columnaj luego el de los elementos de la segunda columna, etc. 

desde j — 1 haeta c hacer 
deede i 1 haeta F hacer 
eecribir (m[i , j ] ) 
fin_desde 
fin_desde 

Para recorrer los elementos de una matriz de n dimensiones, utilizaremos n estructuras repetitivas 
anidadas. 
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; 6.2.4. Arrays como parámetros 

; Los arrays podrán ser pasados como parámetros, tanto a procedimientos como a funciones. Para ello se 
| debe declarar algún parámetro formal del mismo tipo que el array que constituye el parámetro actual. 
I Por ejemplo: 

í ftlgoritmo pasodearrays 

I- tipo 

| array[l..F, l.*C] de real r arr 
S. var 

arr : a 
antero : b 

[ inicio 

I , 

i b *- recibearray { a ] 


!= fin 

f 

l entero función recibearrayíE arr: m) 

\ / /Los parámetros actuales y los formales no necesitan, 

[- //coincidir en el nombre} 


inioio 


| fin_función 


[ 6.3. Registros 

\ 

'y 

| Un registro es un dato estructuxado, formado por elementos lógicamente relacionados, que pueden ser 

* del mismo o de distinto tîpo, a los que se denomina campos , Los campos de un registro podrán ser de un 
[ tipo estándar o de otro tipo registro previamente definido, 

\ Ejemplo de un dato de este tipo podría ser el que permitiera almacenar la situación de un punto en 
I el plano, compuesta por dos números reales. De igual fonna, si lo que se desea es describir a una 
í persona, se podría utilizar un dato de tipo registro para almacenar, agrupada, la información más 
\ relevante. 

I Un tipo registro se declarará de la siguiente foima: 

■ tlpo 

* regiatro: <nombre_del m tipo> 

' <tipo_de_datol> : <nombre_de_campol> [ , <nombre_de_campo2 > ] [ . , , ] 

' <tìpo_de_dato2>:<nombre_de_campoX> [ , <noiribre_de_campoY>] [ . . . ] 

f in 


Para declarar una variable de tipo regjstro: 
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var 

<nombre_del_tipo> r <nombre__de_variable> 

Para acceder a un determinado campo de un registro se utilizará s como suelen emplear la mayoría 
de los lenguajes el nombre de la variable de tipo registro unido por un punto al nombre del campo* 

<nombre_de_variable> . <nombre_de_campol> 

Si los campos del registro fueran a su vez otros registros habrá que indicar 
<nombre_de_varíable> . <nombre_de_campol> , <nombre_de_campo_de_campol> 

Los datos de tipo registro se pueden pasar como parámetros tanto a procedimientos como a funcio- 

nes* 


6.3. 1. Arrays de registros y arrays paralelos 

Los elementos de un array pueden ser de cualquier tipo, por tanto es posible la construcción de arrays 
de registros. 

Otra forma de trabajar en arrays con información de distinto tipo y lógicamente relacionada es 
el uso de arrays paralelos, que, al tener el mismo numero de elementos, se podrán procesar simultá- 
neamente* 


Array de regístro$ 1 

Nombre Edad 


'Ana' 1 

25 

'Carios' 

36 


... 

'Juan 1 2 

34 


Arraya paralelos 

Nombraa Edadas 

Edadsa[1] 
Edades[2] 


Edade&tn] 


a[1] 

Ana' 

Nombra&[1] 

23 

a[2] 

■Carlos' 

Nombres[2] 

36 




... 

a[n] 

'Juatf 

Nombres[n] 

34 


Para acceder al campo nombre del 2° elemento del array A se escribiría a[2].nombre. Por ejemplo, 

eecribir (a [2 ] .nombre) 
presentaría en consola la cadena Carlos* 


6.4. Ejercicios resueltos 

6.1. Deîerminar los valores de los vectores N y M después âe la ejecución de las ìnstruccìones 
siguientes; 
var 

array [1..3] de entero : M, N 

1. M [ 1 ] <- 1 

2. M [2 ] 2 
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3. M[3] 


3 


4. M [ 1] 

<— 

M [ 1] 

+■ M [2 ] 

5. N[2] 

+- 

M [ 1 ] 

- M [ 3 ] 

6. N [3 ] 


M[2] 

+ M [3 ] 

7. N [ 1 ] 


M[3] 

- M [ 1 ] 

S. M[2 ] 


2 * 

N[ 1 ] + N[2] 

9. M[l] 


N f2 1 

- MM ] 



M [1] 

M[2] 

M[3] 

N[1] 

N[2] 

N[3 

i 

1 

- 

- 

- 

- 

- 

2 

1 

.. 2 

- . 


- 

- 

3 

1 

2 

3 


- 

- 

4 

1 

2 

3 

3 

- 

- 

5 

1 

2 

3 

3 

-2 


6 

1 

2 

3 

3 

-2 


7 

1 

2 

3 

2 

-2 


8 

1 

6 

3 

2 

-2 


9 

1 

6 

3 

2 

-2 

J 


6.2, Leer un vector V desde un terminal de entrada. 


Análisis del problema 

DATOS DE ENTRADA: V (el array que vamos a rellenar) 

DATOS AUXJLIARES; n (número de elementos del array) s i (contador que controla el número de 

lecturas y que proporciona además el índice de los elementos del array) 

La lectura de un array es una operación repetitiva ? por lo que se debe utilizar alguna estructura iterativa, 
Si es posible, lo mejor es una estructura para, ya que se conoce de antemano el número de iteraciones 
que se han de realizar. 


Diseno del algorìtmo 


algoritmo e j ercicio_6_2 
conflt 

/ /sl número máximo de elementos de un array lo tomamos como 
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/ / ima constante 
MáxArray = * . . 

var 

array [ 1 . .MáxArray] de entero : v 
entero : i , n 
inicio 
leer(n) 

desde i «- 1 hasta n hacer 
leer (v[i] ) 
fin_desde 
fin 


6.3. Escribìr un algoritmo que permìta calcular el cuadrado de los 100 primeros númervs enteros y 
a coniinuacìón escribîr una tabla que contenga dichos cuadrados. 


Análìsis del problema 

DATOS DE SALIDA: cuadr (el vector qué guarda los cuadrados de los 100 primeros enteros) 

DATOS AUXILIARES: i (variable del bucle) 

Si desea hacer la operación en dos fases, una de cálculo y otra de escritura, se ha de utilizar im array 
Primero se hace un bucle en el que se vayan sacando los números del 1 al 100, se calcula su cuadrado y 
se asigna el resultado a un elemento del array. Un segundo bucle, que se repetirá también 100 veces nos 
servirá para escribir todos los elementos del array. 


Diseno del algoritmo 

algoritmo ej ercicio_6_3 

var 

array [l.,100] de entero : cuadr 
entero : i 
inicio 

/ /rellenar el array con los cuadrados 

desde i 1 hasta 100 hacer 

cuadr [ i ] — ì * ì 

fin_deede 

//escrìtura del array 

desde i — 1 hasta 100 hacer 
eecribir (cuadr [ i ] ) 
f in_desde 
fin 


6.4. Se tìenen N temperaîuras almaeenadas en un array. Se desea calcular su media y obtener el 
nùmero de temperaturas mayores o iguaíes que la ntedia. 
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Anâtìsis del problema 

DATOSDE SALIDA: media (la media de las N temperaturas), mayores (contador que guar- 

dará el número de temperaturas mayores que la media) 

DATOS DE ENTRADA: N (número de temperaturas), temp (array de n elementos donde se guar- 

dan las temperaturas) 

DATOS AUXÏLIARES: i (variable de los bucles que indica también el fndice de los elementos del 

array). 

E1 algoritmo debe tener dos bucles. En el primero se leen por teclado todos los elementos del army. 
Mediante una fimción, se halla la media del array. Una vez leídos los elementos y hallada la media, se 
recorre otra vez el array para detenninar cuántos elementos son superiores a la media. Cada vez que se 
encuentra un dato que cumpla esa condición se incrementa el contador mayores en una unidad. 


DiseHo del aigoritmo 

algoritmo e j ercicio_6_4 

const 

MáxArray = . , , 

tipos 

array [1. .MáxArray] de real : vector 
var 

Vector : temp 
real ; mediatemp 
eatero : mayores , n , i 

inicio 
leer (n) 

deede i *- 1 tiesta n hacer 
leer (temp [i] ) 
fin_desde 

mediatemp medìa ( temp, n) 
mayores +- 0 

desde ì «- 1 hasta n hacer 

si temp [ì ] >- mediatemp entonces 
mayores +- mayores + 1 

fin_si 
f ln_desde 

escribir (mediatemp, mayores} 

fin 

entero función media(E Vector r v ; E entéro n ) 
var 

real : m 
entero i 
ìnicio 

m 0 
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desde i 1 hasta n hacer 
m m + temp[i] 
f in_desde 
devolver (m/n) 
f in_función 


6,5, Calcular la suma de iodos los elementos de un vector de dimensión 100 f asî como su media 
aritméiìca . 

Análisis del problema 

DATOS DE SALIDA: suma (suma át ìos elementos del vector), media (media de los elemen- 

tos) ' 

DATOS DE ENTRADA: vector (el array que contiene los elementos a snmar) 

DATOS AUXILIARES: i (variable del bucle) 

Mediante nn bucle desde se leen y suman los elementos del vecton Una vez hecho esto se calcula la 
media (suma / 1 0 0) y se escriben la media y la snma. 


Diseno del algoritmo 

algoritmo ejercicio_6_5 

var 

array [ 1 , . 100] de entero : vector 
real : media 
entero : suma, i 
inicio 

media *- 0 
suma *- 0 

deade i *- 1 hasta 100 hacer 
leer ( vector [ i ] } 
suma *- suma + vectoir[i] 

fin_desde 

media *- suma / 100 
escribir (media , suma) 

fin 


6,6. Calcular el número de elementos negaiìvos, cero y posiîivos de un vector dado de 60 elementos. 


Análisis del problema 


DATOS DE SALIDA: 


pos (contador de elementos positivos), cero (contador de ceros), neg 
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(contador de elementos negativos) 

DATOS DE ENTRADA: lista (vector a analizar) 

DATOS AUXILIARES: i (variable del bucle) 

Suponiendo que se tíene leído el array desde atgún dispositivo de entrada, se ha de recorrer el array con 
un bucle desde y dentro de él comprobar si cada elemento 1 i s t a [ i ] es Ìgual, mayor o menor que 0 ? 
con lo que se incrementará el contador correspondiente* 


Diseno del algoritmo 

algoritmo ej ercicio_6_6 

var 

array [ 1 T .60] de entero : lista 
entero : pos, neg , cero , i 
inicio 

pos «- 0 
neg «- 0 
cero +- 0 

/ /lectura del array 

degde i «- 1 hasta 60 hacer 
si lista [i] > 0 entonceg 

pos *- pos + 1 

si_no 

gi lista [ i ] <0 entonces 

neg *- neg + 1 

si_no 

cero cero + 1 

f in_si 
f in_si 
fin_desde 

escribir (pos , neg , cero ) 

fin 


Reïlenar una matrìz identidad de 4 por 4 eiementos. 

Análisis dei problema 

DATOS DE SALIDA: matríz (matriz identídad de 4 filas y cuatro cotumnas) 

DATOS AUXILIARES: i (índice de las filas), j (índice de las columnas) 

Una matriz identidad es aquella en la que la diagonal principal está llena de unos y el resto de los 
elementos son 0. Como siempre que se quiere trabajar con matrices de dos dimensiones, se han de 
utilizar dos bucles anidados, que en este caso serán de 1 hasta 4. Para rellenar la matriz identidad, se ha 
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de comprobar que los índicesdelosbucles -ì y j . Si sonigualesmatriz [i , j ] seráigual a 1, encaso 
contrario se asigna 0 al elemento i, j . 


Diseiio del algoritmo 

algoritmo ejercicîo_6_7 

var 

array [ 1 . .4, 1. ,4] da enteros : matriz 
entero : i , j 
ìnìcio 

deade i 1 hasta 4 hacer 
desde j 1 haeta 4 hacer 
bì i = j entonces 

matriz[i, j] «- 1 

si_no 

matriz[i, j] 0 

f in_si 
f in_desde 
fin_desde 
f in 


6.8. Disenar un algoritmo que caìcule el mayor vaìor de una lìsta L de N elementos. 


Ânâlisis del problema 

DATOS DE SALIDA: N (número de elementos de la lista), máx (el elemento raayor de la lista) 

DATOS DE ENTRADA: L (íista a analizar) 

DATOS AUXILIARES: i (índice de la lista) 

En primer lugar se ha de leer la dimensión de la lista (N) y rellenarla (en el ejercicio se rellena simple- 
mente con la instrucción LeerLista ( L , N) ). Para hallar el elemento mayor de un array, se debe 
inicializar la variable máx con el primer elemento de la lista (L [ 1 ] ) y hacer un bucle desde 2 hasta N 
en el que se comparará cada elemento L [ i ] con máx. Si L [ i ] es mayor que máx, L [ i ] será el nuevo 
máximo. 


Disetio del algoritmo 


algoritmo e j ercicîo_6_8 

conflt 

//Se considera que el array tiene un máximo de 100 elementos 
MáxArray - 100 

tipo 

array [1* .MáxArray] de enteroa : lista 
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var 

lista ï L 
entero l màx,N t i 
inicio 
leer (N) 

LeerLieta(L, N) 

raáx L [ 1 ] 

desde ì «- 2 hasta N hacer 
si L [ i ] > máx entoncea 

máx «- L [ i ] 

fin_si 
fin_desde 
escribir (máx) 
f in 


6.9. Dada una lista L de N elementos disenar un algoritmo que calcule deforma independîente 
la suma de los nùmeros pares y la suma de los números impares. 

Anáìisisdel problema 

DATOS DE SALIDA; spar (suma de números pares), simpar (suma de los números impares) 
DATOS DE ENTRADA: L (lista a analízar) 

DATOS AUXILIARES: i (variable del bucle) 

Una vez leído el array se han de analizar cada uno de sus elementos comprobando si L [ i ] es par o 
impar mediante el operador resto (es par si L[i] mod 2 = 0). Si esta condición se cumpie se 
acumula el valor de L [ i ] en spar, en caso contrario se acumulará en simpar. 


Dìseno del algorítmo 

algoritjao e j ercicîo_6_9 
conat 

MáxArray = . * t 

var 

array [1. .MáxArray] do entero í L 
enterò : N, ì , spar , simpar 

lniclo 


// lectura de N elementos del array L 


spar 0 
sìmpar 0 
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deede i 1 hesta n hacer 
si L [ i ] mod 2=0 entonces 

spar spar + 1 [i] 

si_no 

sìmpar — simpar +■ 1 [i] 

f in_si 
f ìn_deede 

escribir ( spar f simpar ) 

f in 


6*10, Escribìr el pseudocódigo que permiia escribir el contenido âe una tabla de dos dìmensiones (5 
x 4). 


Análisis del problema 

DATOS DE SALIDA: tablá (la tabla a escribir) 

DATOS AUXILIARES: I, j (índìces de las fila y columna de cada elemento del árray) 

i 

Si se supone la tabla ya creada, para escribirla se han de recorrer todos sus elementos; Para recorrer un j 

array de dos dimensiones, hay que implementar 2 bucles anidados, uno para recorrer la filas y otro para j 

recorrer las çolumnas. Dentro del bucle intemo, lo unico que hay que hacer es eseribir el elemento ij 
del array, ■ ■ ' - ! 


Diseiío del algoritmo 

algoritmo ej ercicio_6_lG 

var 

array [1..5,1..4] de entero : tabla 
entero : í, j 
ìnicio 

desde i «- 1 liasta 5 hacer 
desde j 1 haeta 4 hacer 
escribir (tabla [ i , j ] ) 
f in_deede 
fin_desde 
f in 


6JL Se desea disenar un algoritmo que permita obtener eî mayor valor almacenado en una tabla 
VENTAS de dos dimensìones (4 ftïas y 5 coiumnas). 
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Análisis del problema 

DATOS DE SALÏDA: máx (el elemento mayor de la tabta) 

DATOS DE ENTRADA: VENTAS (la tabla a analizar) 

DATOS AUXILIARES: i, j (índices de la fila y columna de cada elemento), fmáx, cmáx (fìla y 

columna del elemento mayor de la Usta) 

En este ejercicio se empleará otro método para hallar el máximo. En vez de hacer la búsqueda tomando 
como referencia el contenido del elemento mayor, se usa como referencia la posición (fila y colnmna) 
que ocupa dicho elemento. 

Después de leer la tabla, se inicializan los valores de fmáx y cmáx (fila y columna que ocupa et 
elemento mayor) a 1. Se debé recorrer el array con dos bucles anidados, En el bucle intémo se compará 
VENTAS t ì , j ] , con VENTAS [ fmáx , cmáx] , Si es mayor, fmáx y cmáx pasarán a tener el valor 
que en esos momentos contengan i y j . A1 final del bucle en fmáx y cmáx estará guardada la posición 
del elemento maỳor por to que asignamos a la variable máx el contenido de VENTAS [ f máx , cmáx ] y 
lo escribimos. 


Diseho del algorîtmo 

algoritmo e jercicîo_6_li 

var 

array [1..4,1,.5] de entero : VENTAS 
entero : i, j , fmáx # cmáx ; máx 

inieio 

//lectura del array VENTAS 
fmáx «•- 1 
cmáx 1 

desde i 'í- 1 hasta 4 hacer 
desde j «- 1 haeta 5 hacer 

si VENTAS [ i , j ] > VENTAS [ fmáx, cmáx] entoncea 

fmáx <- ì 
cmáx «- j 

fia_si 
f in_desdo 
fin_deede 

máx VENTAS [ f máx f cmáx ] 

escribir (máx) 
fin 


6.12. Hacer diferenies listados de una lista de 10 números según el siguiente criterio: 

si nûmero >=0 y número < 50> ponerlo en LISTAl 
si nùmero >= 50 y numero <100, ponerìo en LISTA2 
si numero >=100 y número <=150, ponerlo en LISTA3 
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Análisis del problema 

DATOS DE SALIDA: LISTAl, LISTA2, LISTA3 

DATOS DE ENTRADA: LISTA Oìsta que contiene los números iniciales) 

DATOS AUXILIARES: i (índice de las lista original), contal, conta2, conta3 (índices de 

cada una de las listas de salida) 

Se han de utilizar cuatro arrays que tendxán todos la dimensión del array original LISTA (10 elemen- 
tos). Una vez leido el array LISTA, se debe recorrer para comprobar cada uno de sus elementos e 
introducirlo en la lista correspondiente incrementando también su índïce. 

Una vez llenas las tres tistas de salida, se escriben mediante tres bucles que irán cada uno desde 1 
hasta el último valor del índice correspondiente. Comó la operación de escritura va a ser igual para las 
tres listas se implementará un procedimiento que se encargue de la operación de lectura. En dicho 
procedimiento se pasa la lista y el numero de elementos de lamisma (contal, conta2 , conta3). A1 
utilizar un procedimiento con un tipo de datos estructurado, es necesario crear un tipo de datos definido 
por el usuario (vector)* 


Diseiio del alg&ritmo 


algoritmo ej ercicìo_6_12 

tipo 

array [1,-10] de entero r vector 
var 

vector í LISTA, LISTAl, LISTA2 , LISTA3 
entero : i , contal , conta2 , conta3 

inicio 

contal *- 0 
conta2 +- 0 
conta3 0 

/ /leemos el array LISTA 

desde i «- 1 hasta 10 hacer 
si LISTA [ i ] > 0 entoncee 
si LISTAti] < 50 entonces 

contal <- contal +■ 1 
LISTAl [contal] LISTA[i] 

si_no 

si LISTA [ i ] < 100 entonces 
conta2 <- conta2 + 1 
LISTA2 [conta2 ] *- LISTA[i] 

ai_no 

si LISTAti] <= 150 entonces 
conta3 conta-3 + 1 
LISTA3 [conta3] +- LISTA[i] 

fin si 
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fin_desde 

EscribirVector ÍLISTAl, contal ) 

EscribirVector (LISTA2, conta2 ) 

EscribirVector (LISTA3 , conta3) 

fin 

procedimlento EscribirVector (E vectorr v ;E' entero : n) 
var 

entero : ì 
inicio 

desde i +- 1 tiasta n hacsr 
escribir (v [ i] ) 
fin_dssde 
f i n_pr oce dimi en t o 


6*13, Rellemtr un vecîor a de N elementos cort enteros consecutivos de forma que para cada eletnento 
Á.*-L 

ï 

Análisis del problema 

DATOS DE ENTRADA: A (el array a rellenar), N (numero de elementos del array) 

DATOS AUXILIARES: i (índice del array) 

Se debe ejecutar un bucle desde N veces, Dentro del bucle hay que hacer la asignación A [ i ] +— i. 


Diseno del algoritmo 

alporitmo Ej ercicio_6_13 
const 

MáxArray - ... 

var 

entero : i 

array [1 . .MáxArray] de entero : A 
inicio 

desde i +- 1 hasta MáxArray bacar 
Ati] í 
f ln_desde 
f in 


6,14, Escribir un programa para întroducir una serie de númems desde el teclado. Utilîzar un valor 
centineïa -1E5 para terminar îa serìe . El programa calculará e imprimîrá el número de valores 
leídos f la suma y la medìa de la tabla. Además f generará una tabla de dos dimensiones en el 
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que la primera columna será el propio nùmero y h segunda indìcará cuânto se desvia de îa 
media. 

Análisis del problema 

DATOS DE SALDDA: conta (número de valores leidos), suma (suma de todos los valores), 

media(mediadedichos valores), desvìación(tabla conlasdesviacíones 
de cada elemento con respecto a la media). 

DÀTOS DE ENTRADA: vector (el vector que leemos), núm (cada uno de los números que lee- 

mos) 

DATOS AUXILIARES: i (índice del vector) 

Se debe dimensionar el array a un número io suficientemente grande como para que quepan los valores 
a procesar. Como ese número no está determinado, se dimensiona al número máximo de valores previs- 
to (representado por MáxLista), 

E1 bucle utilizado para procesar el vector no puede ser un bucle desde, sino que se debe utilizar 
uno repetir o unmientras, Dentrode estebucle de lectura, se lee el elemento, se acumula su valor 
en suma y se incrementa el índice i. La varíable leída será núm ? y una vez verificado que es distinta de 
-1E5 j se asigna el valor vector [ i ] . 

E1 número de valores procesados (conta) será igual al último valor de i. Se halla la media 
(suma / conta) y se escribe conta ? media y suma. 

Para hallar la desviación de cada uno de los elementos se hará otro bucle (ahora sirve un bucle 
desde) en el que el índice vaya tomando valores entre 1 y conta. Dentro del bucle se calcula la 
desviación de elemento y escribimos ambos. 

Diseno del algoritmo 

algoritmo e jercicio„6_14 

const 

MáxArray = ... 

var 

array [ 1 , .MéxArray] de real ; vector 
array [1 . .MáxArray f 1 . . 2 ] de real : desviacion 

entero : ì.j.conta 
real : núm f sumajrmedia f desviación 

inicio 
i «*- 0 
suma +- 0 
leer (núm) 

mientras num <> -1E5 hacer 
Ì 4- Ì + 1 
vector [ í ] 'í- núm 

suma +-y suma + vector [i) 
leer (núm) 
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fin_mientraa 

conta <- i 

rnedia suma /conta 
escribir ( conta, suma, medîa) 

deede i +- 1 hasta conta hacer 
desvìación[ì, 1] <- vector [i] 
desviación[i, 2] ^ vector[i] - media 

f in_desde 
f in 


6.15* Dado m vector X compuesto por N elementos, se desea dìsenar un aìgoritmo que caïcule la 
desvìación estándar D. 


D = 


(x ' - *> a 

n - ï 


_ x t H- x 2 + + x 

x = — 

n 


Attálìsis del problema 

DATOSDESALIDA: DesviaciónEst (función que calcula la desviación estandar) 

DATOS DE ENTRADA: X (el vector), N (númeno de elementos) 

DATOS AUXILIARES: i (índice del array), media (media de los elementos) 


Se desarrolla utia función que pennita calcuiar la desviación estándar de N eleímentos de una lista de 
números reales. La fìinción va a recibir como parámetros de entrada el vector X -al que damos un tipo 
de datos vector que debe estar definido previamente- y el numero de elementos, Una función se encar- 
garádehallar lamedia. Dentro de estafìmción* es necesario saber la sumade loselementps r paraloque 
utilizaremos otra íunción SumaReal. Una vez calculada la media, mediante un bucle se halla la suma 
de los cuadrados de cada elemento menos la media, necesaria para poder hallar la desvíación. Por 
último se calcula la desviación estándar por la fórmula dada anteriormente, ; v - 


Diseno del algoritmo 

real función DesviacìónEst (E vector : x ; E entero r n) 
var 

real : media , suma 

entero : î 
inicio 

media +- MedîaReal ÍX,n) 
suma <- 0 
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deade i *- 1 h&âta n hacer 

suma suma + cuadrado (x [i] - media) 

f in_desde 

devolver (raíz2 (suma) / (n-1) ) 

f in_función 

real función MedíaReal( E vector : v ; E entero : n) 
inicio 

devolver í SumaReal ( v f n) / n) 

fln_función 

real función SumaReal ( E vector : v ; E entero : n) 
var 

real : suma 
entero : i 
inicìo 

suma «- 0 

desde i +- 1 hasta n hacer 

suma *- suma + v[i] 

f in_desde 

SumaReal +- suma 

fin_función 


6.16 . Leer una matriz âe 3 x 5, 

Análisis del problema 

DATOS DE ENTRADA: matriz (la tabla o matriz de 3 x 3) 

DATOS AUXILIARES: i,j (índices de las fila y columna de cada elemeïito del artay) 

Para leer una rnatriz es necesario utilizar dos bucles anídados. Dentro del bucle interior se incluye una 
operación de lectura con cada elemento de la matriz. 


Diseno deí aígorUmo 

aigoritmo ej ercicio_6_16 

var 

array [1 . . 3 , 1 . . 3 ] enteros : matriz 
entero : i , j 
iniclo 

deede i «- 1 hasta 3 hacer 
desde j *- 1 haata 3 hacer 
leer(matriz [ì, j ] ) 
f in_desde 
fin desde 
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fin 

6,17. Escrìbir el aîgoritmo que permita sumar eî número de elementos posìtivos y eì de negativos 
de una tabla T de n filas y m columnas. 


Análìsis det problema 

DATOSDE SALIDA: pos (suma de tos elementos posítivos), neg (suma de los elementos ne- 

gativos) 

DATOS DE ENTRADA: T (tabla a procesar), n (númen) de filas), m (número de columnas) 

DATOS AUXTLIARES: i, j (índices de los elementos de la tabla) 

Después de leer la tabla, se recorre mediante dos bucles anidados. En el bucle intemo se ha de compro- 
bar si T [ i , j ] es positivo o negativo. Si es mayor que 0 se acumuia el valor de T [ i , j ] en pos. Si es 
menor que 0, se hace la misma operación en neg, En otro caso, T [ i , j ] sería Ìgual a 0, por lo que no 
se ha de hacer nada. 


Diseno det algoritmo 

algoritmo ejercicío 6_17 

conat 

MáxFila = . . . 

MáxCol = 

var 

array [1. .MáxFila,l. .MáxCol] de entero : T 
entero : T 
inicio 

leer (n,m) 

// lectura de la tabla 
pos 0 
neg +- 0 

deade ì 1 hesta n hacer 
desde j «- 1 haeta m hacer 
si T[i,j] >0 entonces 

pos «- pos +■ T [i , j ] 

ei_no 

ai T [i , j ] < 0 entonces 
neg *- neg + T [i , j ] 

f in_si 
fin_ei 
fìn_deede 
f in_desde 
eecribir (pos , neg) 
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&Î8. Supongctftios que existen N cìudades en la ved fevrovi&vìa de un pais, y que sus nombves están 
aïmacenados en un vectov Uamado CIUDAD. Disenar un algoritmo en el que se lea et nombre 
de cada una de las cìudades y îos nombres con los que está enlazada. 

Anátísis del problema 

DATOS DE SALIDA: Listado de ciudades 

DATOS DE ENTRADA; CIUDAD (vector donde se guardan los nombres de las ciudades), ENLACE 

(array donde representamos los enlaces de unas ciudades con otras), N 
(número de ciudades) 

DATOS AUXILIARES: i J (jndices de Jos airays) 

En primer lugar, hay que ver las ciudades que están enlazadas entre sí; para ello se utíliza uua tabla de 
N x N elementos que representan las ciudades, Por ejemplo, la indicación de que la ciudad 3 está 
enlazada con la 5 (CIUDAD [3 , 5 ] ) se realiza mediante una marca, por ejemplo un 1. Si no estan 
enlazadas en dicho elemento se pone un 0. La tabla de ciudades, será un array triangular: sólo se ha de 
llenarmedio airay, yaque si laciudad 1 estáenlazada con laciudad 2, laciudad2 lo estaráconla L Por 
lo tanto el bucle intemo irá desde i+I hasta n. 

Para sacar los nombres de las ciudades se necesita disponer de otro airay en el que el elemento 1 
contenga el nombre de la ciudad 1, el 2 el de la 2 y así hasta el número de ciudades, es decir, hasta N. 

Después de llenar el array de enlaces y el de ciudades (para hacer el listado que pide el problema) 
es necesario recorrer toda la tabla de enlaces mediante 2 bucles anidados, En el bucle extemo se debe 
escribir el nombre de la ciudad a la que se sacan los enlaces; es decir si se está en la ciudad i, se debe 
escribir CIUDAD [ i ] . En el bucle intemo se debe comprobar el contenido de ENLACE [ i , j ] . Si éste 
es distinto de 0, se escribe la ciudad con la que está enlazada (CIUDAD I j ] ). 

Diseho del algoritmo 

algoritmo ejercicio_6_18 

const 

n = * * * 

var 

array[l. .n] de cadena : ciudad 
array [1 , 1 , ,n] de entero : n 
entero : i , j 
lïiicio 

// lectura del array de ciudades y de enlaces 

desde i 1 hasta n hacer 
leer ( ciudad [ i ] ) 
desde j í+1 hasta n hacer 
leer ( enlace [ i , j ] ) 

f in_desde 
f in_desde 

/ / listado de las ciudades con sus enlaces 
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desde i *— 1 haeta n hacer 
escriblr ( cindad [ î ] ) 
deede j «- 1 hasta n hacer 

si enlace [ i f j ] = 1 entoncas 
eecribir ( cindad [ j ] ) 
f in_si 
fin_deede 
fin_desde 
fin_desde 

6,19, Determînar si una matriz de tres filas y tres columnas es un cuadrado mágico. Se considera un 
cuadrado magico aquel en el cuaì las jìîas t columnas, y las diagonales principal y secundaria 
suman lo mismo , 

Anâlisìs del problema 

DATOS DE SALIDA: Mensaje queindica si es un cuadrado mágico 

DATOS DE ENTRADA: cuad (la matriz que vamos a comprobar) 

DÀTOS AUXILIARES: i , j (índices de los arrays), mágico (variable lógica que valdrá verdadero 

si la matriz es un cuadrado mágico),suma (sumador que acumula la suma 
de los elementos de la primera fila) s diagonall y dìagonal2 (suma 
de los valores de la diagonal principal y secundaria respectivamente) 

Después de sumar la primera fila mediante una función SumaFìla, se utiliz un bucle desde, que 
comprueba las siguientes fílas llamandò a su vez a la función SumaFila. Para no tener que recorrer 
todo cl array, el bucle extemo será un bucle que se repita mientras que el índice sea menor o igual que 
3 o la variable mágico sea cierta (prevíamente se inicializa la variable mágico a f also), Dentro de 
ese bucle se ha de pasar a la función la fila que se desea sumar (i), y se comprueba si el valor que 
retoma la función es igual al valor de la suma de la primera fila (suma), 

De forma similar se procede con la suma de las columnas en la que utìlizaremos la función SumaCol. 
Para las diagonales se utiliza un bucle desde en el que se acumulan todos los valores de cuad [1,1] 
en la variabte diagonall y los valores de cuad[i, 4 — i ] en diagonal2. Si después de esto el 
valor de todas las sumas de filas, columnas y diagnonales son iguales, mágico será verdadero, y 
aparecerá el mensaje diciendo que la matriz es un cuadrado mágico, 

Diseno del algoritmo 

algoritmo e j ercicio_6_19 

tipoe 

array [1. .3, 1 , .3] de entero : tabla 
var 

tabla : cuad 

entero : suma f dîagonall , dìagonal2 , i 
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lógico : mágìco 
iniclo 

mágico V 

// lectura áe la matriz 
leor (cuad) 

//hallamos ■ la suma de la primera fila 
suma SumaFìla (cuad, 3,1) 

/ /hallamos la sunia de las restantes f ilas 

i «- 1 

mientrae i < 3 y mágico hacer 
i «- i + 1 

mágìco suma = SumaFila (cuad, 3 , ì ) 

f in_mientrae 

//hallamós- la suma de latì- colúmnaS • 
i ■*- 0 

mientras í < 3 y mágîco hacer 
i — i + 1 

mágico — suma = SumaCol (cuad, 3 , i ) 

f in_mlentrae 

/ /hallamos la suma de las diagonales 

ôi tnágico entoncee //si 2a varîable mágico es cierta 
diagonall 0 
' diagonal2 '«- 0 

desde i «- 1 haeta 3 hecer 

diagonall diagonall + cuád[i,i] 

diagonal2 ^ diagonal2 + cuadti, 4-i-] ■ 

fin_desde 

fin_si ; ,J 

mágico ■*- mágico .y (diagonall = suma}. y (diagonal.2 suma) 
sl mágico entonces 

escribir ( 'La matriz és un "cuadràdo mágico ' ) 

f in_ei 

fin ■■■■■ : ^ 

entero funcìón SumaFila ( E : tabla : t í e entero : n, i ) 
var 

entero : h suma 
inicìo 

suma *- 0 

deede j 1 hesta n hacer 

suma «- suma + t [ i , j ] 

fin_desde 
devolver ( suma ) 
f in_función 

entero función SumaCol í B tabla : t ; E entero n, j) 
var 

entero : i , suma 
înlcìo 

suma «- 0 
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âesde ì 1 haeta n hacer 

suma — surna + t [ i , j J 

fìn_deede 
devolver(suma) 
f in^función 

6,20. Visuaiizar ïa matriz traspuesta de una matriz Mde 6 x7 elementos. 


Análms det problema 

DATOS DE SALIDA: MT (matríz traspuesta de M) 

DATOS DE ENTRADA: M (matríz original) 

DATOS AUXILIARES: i, j (índice de las matrices) 

Una matriz traspuesta (MT) a otra es aquella que tíene mtercambíadas las fìlas y las columnas. Si una 
matriz M tiene 6 fílas y 7 columnas, MT tendrá 7 filas y 6 columnas. Mìentras se lee la matriz M, se 
puede obtener MT, ya que a cualquier elemento M [ i , j ] , le corresponderá MT [ j , i ] en la matriz MT. 
Una vez leída, se escibe mediante otros dos bucles desde anidados. 


Diseno del algoritmo 

algoritmo ejercicio_6_20 

var 

array [ 1 . . 6 f 1 . , 7 ] de entero : M 
array[l. .7,1. .6] de entero : MT 
entero : i , j 
inicio 

desde i — 1 hasta 6 hacer 
desde j *- 1 hasta 7 hacer 
leer (M[î, j ] ) 

MT[j,i] - M[i f j] 
fin_deede 
fln_desde 

desde î 1 hasta 7 hacer 
desde j - 1 hasta 6 hacer 
escribir (MT [ i , j ] ) 
f±n_desde 
fln_desde 
fin 

6.2 L Disenar unafimciôn con la que dadas dos matrices pasadas como parámetros, compruebar si 
son ìdénticas. 
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Anâlisis del algoritmo 

DATOSDE SALIDA: Mensa j e 

DATOS DE ENTRÂDÀ: A,E (las dos matrices) M,N (dimensiones de la matriz A), 0,p (dimensiones 

de la matriz B) 

DATOS AUXILIARES: i,j (índices de las matrices), iaénticas (variable lógica que valdrá 

verdadero si las dos matrices son iguales) 

Para comprobar si dos matrices A y B son idénticas, lo primero que se ha de hacer es compròbar si sus 
dimensiones son Ìguales. Si esto es cierto se pasa a recorrer ambas matrices mediante dos bucles anida- 
dos. Como es posible que no sean Ìdénticas, a veces no será necesario recorrer toda là matriz, sino sólo 
hasta que se encuentre un elemento diferente. Por esta razón no se utilizan bucles desde sino bucles 
mientras que se ejecutarán mientras i o j sean menores que los límites y sean idénticas las matrices 
(idéntica sea verdadero). Dentro delbucle intemo se comprueba si A [ì , j ] es distintoaB [i f j ] , 
en cuyo caso se pone la variable idéntica afalso (antes de comenzar ios bucles se ha puesto a cierto 
la variable). Si después de recorrer las tablas, idéntica es verdadero, la funcíón devolverá un valor 
lógico verdadero. 


Diseno del algoritmo 

/ / suponemos creado el tipo vector 

entero fiuición Matrizldéntica (E vector :A,B ; E entero :M ( N,0;P } 

var 

entero : i , j 
lógico : idéntica 

inicìo 

idéntica <- M = OyN-P 
si idéntica entonces 
i +“ 0 

mientrae i < M y idéntica hacer 
j - Û 
i «- i + 1 

mientras j < N y îdéntica hacer 

j «- j + 1 

ìdéntica +“ A[i;j] = B[i,j] 

fin_mientras 
fin _mientras 
f in_si 

devolver ( idéntica ) 
fin_función 


6,22 * Un procedimiento que obtenga la matrìz suma de dos matrices. 
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Anâlisis del problema 

DATOS DE SALIDA: S (matrìz suma) 

DATOS DE ENTRADA: A, B fmatrices a sumar), M, w (dimensiones de la matriz A), 0, P (dimen- 

siones de la matriz B) 

DATOS AUXILIARES: i ? j (índices de las matrices) 

Para realizar la suma de dos matrices, es necesario que ambas tengan las mismas dimensiones, por lo 
que lo primero que Se ha de hacer con los parâmétros M, N, 0 y P es comprobar que M es igual aOyNes 
igual a P, Se leen \as matrices AyB desde algùn dispositivo de entrada y se realiza la suma. Si esto no 
ocurre, el parámetro de salida error devolverá un valor verdadero. 

En la suma de matrices, cada elemento S [ i , j ]' es igual a A [ i f j ] +B [ i , j ] y se debe ? por lo 
tanto, recorrer las matrices A y B con dos bucles anidados para hallar la matriz suma. 


Diseno del algoritmo 

procediraiento MatrisSuma( E tabla : A, B ; E entero : M,N,0,F ; 

S tabla : Suma ; S lógico : error } 

var 

entero : i f j 
inicio 

siMoOoNoP entoncee 

error V 

ei_no 

error <- F 

desde i <— 1 hasta M hacer 
desde j «- 1 hasta o hacer 

Sumafi, j] *— A [ i f j ] + B [ i / j ] 

fin_desde 

fin_desde 

fin_si 

fin_procedimiento 


6,23. Escribir el algoritmo de un subprograma que obtenga îa matriz productú de dos matrices pasa- 
das como parâmetros , 

Análisis del problema 

DATOS DE SALIDA: Prod (matriz producto), error (da verdadero si hay un error en las di- 

mensiones) 

DATOS DE ENTRADA: A, B (matrices a multiplicar), M, N (dimensiones de la matriz A\ 0, P 

(dimensiones de la matriz B) 
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DATOS AUXILIARES: i, j , k (índices de las matrìces) 

Se recorren ia matrices con dos bucles desde anidados siempre que N sea iguai a 0. La matriz produc- 
to tendrá una dimensión deMxP. Cada elemento de la matriz producto Prod [ i , j ] será: 

A[i,l]*B[l,j]+A[ì jr 2]*B[2 # j] + . * . +A[i , N] *B [N, j ] 

por lo que dentro del bucle intemo se necesita otro bucle desde para que vaya sacando números 
correlativos entre 1 y N. 

E1 subprograma que se ha de utilizar será un procedimìento, ya que aunque devuelve un dato (la 
matriz producto), éste es estructurado, por lo que no puede relacionarse con el valor que devuelve una 
íunción. A dicho procedimiento se pasan como parámetros de entrada las dos matrices y sus dimensío- 
nes; como parámetro de salida la matrìz producto Prod y error, que será un vaior tógico verdadero 
si tas matrices no se pueden muitiplicar. 


Diseno del algoritmo 

procedimiento MatrizProducto (B tabla : A, B ; B entero : M,N, 0, P ; 

S tabla : Prod ; S lógico error) 


var 

entero : i , j , k 
inicio 

si N <> O entoncea 

error *- V 

si_no 

error +- F 

desde i +- 1 hasta M hacer 
desde j 1 hasta P hacer 

Prod [ i , j ] 0 

deade k «- 1 hesta N hacer 

Prod[i , j ] Prod [i,j]+A[i,k]*B[k,j] 

£in_deade 
f in_desde 
fin_deade 
f in_si 

f in_procedimiento 


6*24, Se tiene una matriz bìdìmensional de m x n elementos que se ìee desde el dispositivo de entra- 
da. Se desea calcular la suma de sus elementos mediante unajunción . 


Análisis del problema 


DATOS DE SALIDA: 


suma (suma de los elementos de la matrìz) 
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DATOS DE ENTRADA: tabla (matriz a procesar), m, n (dimensiones de tabla) 

DATOS AUXILIARES: i, j (índices de la matriz) 

Para obtener la suma de los elementos de una matriz, se recorren mediante dos bucles desde anidados. 
Dentro del bucle intemo se hace la asignación suma «- suma + tabla [ i # j ] , Antes de entrar en 
los bucles se ha de haber inicializado la variable suma a 0. 


Dìseno del algoritmo 

ôntero función SumaTabla( E tabla : t ; E entero : m,n) 
var 

entero : i , j , suma 
inicio 

suma *- 0 

deede i 1 hasta m hacer 
desde j *- 1 hasta m hacer 
suma <- suma + t[i,j] 
fin_desde 
f in_desde 
devolver(suma) 
fin_función 


6*25* Una matrìzA de m jìïasy n columnas es simétrica si m es iguai any se cumple que 

= A J{ para l<i<my î <j <n 

Se desea una funcìón que tome como parámeîro de entrada una matriz y sus dimensìones y 
devueïva unvalor lógico que determine si se trata de una matriz sìmèirica o no * 


Análisis del problema 

DATOS DE SALIDA: Mensaje que nos indica si es o no simétrica 

DATOS DE ENTRADA: A (la matriz a comprobar), n, m (dimensiones de la matriz) 

DATOS AUXILIARES: i, j (índices de la matriz), simétrìca (variable lógica que valdrá ver- 

dadeio si A es simétrica), 

Para comprobar si es simétrica primero se debe comprobar si m es igual a n y luego recorrer el array con 
dos bucles anidados que deberán terminar cuando se acaben de comprobar los elementos o cnando 
encuentren un elemento A [ i , j ] distinto del A [ j , i ] . Por lo tanto se utilizan bucles mientras en 
vez de bucles desde. 

Además, no es preciso recorrer todo el array. Si se comprueba que A { 3 , 4 ] es igual que A [4 , 3 ] , 
no hace falta ver si A [4 , 3] es igual que A[3 , 4] . Lógicamente, cuando i es igual a j tampoco hace 
falta comprobar si A [ 3 , 3 ] es igual a A [ 3 , 3 ] , Por ío tanto en el bucle extemo, la i deberá ir tomando 
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valores entre 1 y M-l, En el ìntemo la j deberá ir tomando valores entre i+1 y N. .Dentro del bucle 
intemo, si A[ 1 , j ] <> A[ j , i] se pone la variable simética a falso con lo que se sale de los dos 
bucles. 


Dìseiío del algoritmo 

lógico función EsMatrizSimética (E tabla : tabla ; B entero m,n ) 
var 

entero : í , j 
lógico : simética 

inicio 

simética *- m = n 
eì simética entonces 
i «- 0 

mientras i < M-1 y simética hacer 
i i + 1 

j <- 1 

mientras j < N y sìmética hacer 

j j + 1 

simética t í i , j ] = t [ j , ì] 

f in_mientras 
f in_mientras 
f in_si 

devolver ( simética ) 
f in_función 


6,26, Una empresa de venta de productos por correo desea realizar una estadistica de las ventas 
realizadas de cada uno de los productos a lo largo deî ano. Distrìbuye un total de 100 produc- 
tos, por lo que las ventas se pueden almacenar en una tabla de 100 fiîas y 12 columnas. Se 
desea conocer; 

El total de ventas de cada uno de los productos 

El totai de ventas de cada mes 

El producto más vendido en cada mes 

El nombre, el mes y la cantidad del proâucto mâs vendìdo 

Como resuìtado fìnal, se desea realizar un îìstado con el siguiénte formato: 
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Enero 

Fabrerû 


Dídembre 

Total prûducto 

Pfodjcto 1 






Prodiicto 2 












Producto 100 






Total mofi 






PnoductD más vandido 







Nombre cfeJ producto y mes del producto más vendido en cualquier mes del ano: 


Anâlisis del problema 


Para realizar este problema se utilizarán cinco arrays: 


PRODUCTOS 

VENTAS 

TOTALPROD 


TOTALMES 


MAXIMOMES 


E1 array PRODUCTOS será un array de cadena, de 100 elementos en el que se guardarán los 
nombres de los productos. VENTAS es un array de dos dimensiones de tipo entero de 100 fllas y 12 
colunmas que almacena las ventas de cada producto en cada mes del ano. TOTALPROD será un airay de 
j 100 elementos en el que guarda el total de ventas anual de cada producto. TOTALMES tlene 12 posicio- 

I nes y guarda el total de ventas de cada uno de los meses y MÁXIMOMES el número del producto más 

f vendido cada uno de los meses del ano. 

E1 diseno modular del programa quedaría de la siguiente forma: 



E1 programa principal llamará a un procedimiento que leerá los datos, es decir los nombres de los 
productos y las ventas de cada producto en cada uno de los meses* A partir de ahí, un bucle se encargará 
de ir sumando las filas, utilizando la función SumaFilas que ya desarrollamos anterìormente, y otro 
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las cohimnas con la función SuinaCol, En ambos bucles se almacenan los resultados en los anays 
totalproD y TOTALMES respectivamente. Una cuarta función se encargará de buscar la posición del 
máximo elemento de cada columna y una última buscará la fila y ia columna (fmáx y cmáx)de ele- 
mento mayor del array para poder obtener el nombre, el mes y la cantídad del producto más vendido* 

Para terminar, el listado se realizará dentro del propio programa principal que utilizará los arrays 
anteriores para la presentación de los resultados. 


Diseno del algorîtmo 

algoritino ej ercicio_6_26 

tipo 

array [1 . , 100, 1 . . 12] de entero : tabla 
array[l. .12] de entero : vector 
array [1. . 1003 de cadena : productos 
array [ 1 . . 100 ] de entero : totales 
var 

tabla : tabla 
vector : TotalMes , Máximos 

producto : prod 
totales : tot 
entero : i , f máx , cmáx 

Inicio 

LeerDatos {ventas , prod, 100,12) 

// cálculo del array con los totales por producto 
// (suma de filas) 

deede i 1 hasta 100 hacer 

tot [i ] SumaFìla (ventas, 12 , i ) 

f in_desde 

/ / cálculo del array con los totales por mes 
// (suma de coiumnas) 

deede j *- 1 hasta 12 hacer 

TotalMes [ j ] SumaCol (.ventas , 100 , j ) 

f in_desde 

// cálculo del array con los máximos por mes 
//(máximo de columna) 

desde j *- 1 hasta 12 hacer 

Máximos [ j ] *- MáximoCol (ventas , 100 f j ) 

f in__desde 

// obtención de la fila y columna de la tabla donde 
/ / se encuentra el máximo 
MáximoTabla (ventas ,100,12, fmáx, cmáx) 

/ / listado de resultados 

desde ì *- 1 haeta 100 hacer 
eecribir (prod [i ] ) 
desde j *- 1 haata 12 hacer 

escribir (ventas [i , j ] ) // escrìbìr en la 

// misma línea 
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fih_desda 

/ / salto de línea 

fin_desde 

// escribir la fila con los totales por mes 
deade j «- 1 hasta 12 hacer 

escribir (TotalMes [ j ] ) // escribir en la 

/ / misma línea 

fin_desde 

/ / escribir la Êila con los máxiiuos por mes 
/ / Como deseamos escribir el nombre del producto , y el 
/ / array está lleno con 

// la fila que ocupa la posición del máximo, 

/ / debemos escríbìr prod [Máximos [ j ] ] 
desde j 1 ha.sta 12 hacer 

escribir ( Prod [Máxìmos [ j ] ) ) // escribir en la 

// misma línea 

fin_desde 

// escribir el producto>el número del mes y la oantidad 
// que más se ha vendido 

escribix (prod[fmáx] # cmáx, ventas [ fmáx, cmáx]0 

fin 

procedimiento LeerDatos ( S tabla : v ; tabla ; S producto ; p ; 

B entero : m,n) 

var 

entero : í # j 
inicio 

desde i *- 1 hasta m hacer 

leer (prod [ i] ) 

desde j 'f- 1 hasta n hacer 
leer (ventas [i, j ] ) 
fin_desde 
fin_dôflde 
f in_p r oc ed imi en t o 

/ / los procedimientos SumaFila y SumaCol ya se han implementado 
// anterîormente 

entero funclón MáximoCol ( E tabla : t ; B entero : n,j) 
var 

entero : máx, i 
ìnicio 
máx *- 1 

desde i +- 2 haeta n hacer 

sl t[i,j] > t[máx,j] entonces 
máx *- i 
f in_si 
£in_desde 
devol ver ( máx ) 
fin_función 
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procedimiento MáxîmoTabla ( E tabla : v ; E entero : m.rt ;S entero : f,c) 
var 

entero : i , j 
inicio 
f <- 1 
c * — 1 

desde i «- 1 haeta m hacer 
desde j 1 hasta n hacer 

si t [ i , j ] > t [ f , c ] entonces 
t <- i 
c ^ j 

fin_si 
fin_desde 
f in__desde 
f in_pr oc edimient o 


6.2 7* Una fábrica de muebles tiene 16 representantes que viajan por toda Espana ofreciendo sus 
productos, Para tareas admnistrativas el pais está dividido en cinco zonas: Norte } Sun Este } 
Oeste y Centro , Mensuaîmente almacena sus datos y obtiene distintas estadístìcùs sobre el 
comportamiento de sus representantes en cada zona. Se desea hacer un programa que lea los 
datos de todos los representantes con sus ventas en cada zona y calcule el îotal de ventas de una 
zona introducìda por teclado, eï total de ventas de un vendedor introducìdo por teclado en cada 
una de las zonas y eî total de ventas de un día y para cada uno de los representantes. 


Análisis del Problema 


Una de las formas posìbles de almacenar estos datos sería un array de 3 dimensiones, Se puede conside- 
rar que las filas son los representantes -de 1 a 16- ? las columnas los días del mes -si se consideran 
meses de 31 días, de 1 a 31-y que esta estructura se repite cinco veces, una vez por cada zona. De esta 
forma se podría representar el array de la siguiente forma: 


DIAS 



A1 trabajar con un array de tres dimensiones es preciso utìlizar tres índices, r para los represen- 
tantes, d para los días y z para las zonas. 

Una vez leído el array, para el primer proceso ? se ha de introducÌT el número de la zona (númzona) 
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y con esa zona fíja ? recorrer las filas y las columnas, acumulando el total en un acumulador, Para 
obtener el total de ventas de un vendedor, se introduce el número de representante (númrep) y con 
dìcho índice fijo recorrer la tabla por zonas y días. Por fin, para el último punto se introduce el número 
del día (núrndía) y recorreremos la tabla por representantes y zonas. 


Dîseno del algoritmo 

algoritmo ejercicio_6_27 

var 

array [1. .16,1. .31,1, ,5] de entero : ventas 
entero : r , d, z , numzona f númrep, nùmdía, suina 

inicio 

// lectura de la tabla 

desde r «- .1 hasta 16 hacer 
desde d *- 1 hasta 3 1 hacer 
desde z 1 hasta 5 hacer 
leer ( ventas [ r , d, z ] ) 
fin_desde 
f in_deede 
fin_desde 

// cálculo del total de una zona 
leer (númzona} 
suma <- 0 

deede d 1 hasta 31 hacer 
desde r «- 1 hasta 16 hacer 

suma <— suma +■ ventas [r , d, númzona] 

fin_desde 
fin_desde 
escribir ( suma) 

// cálculo de las ventas de un representante para cada una de las zonas 
leer (numrep) 
suma <— 0 

deede z 1 haeta 5 hacer 

suma «- 0 

desde d 1 hasta 31 hacer 

suma «- suma +■ ventas [númrep, d, z] 

fin_desde 
escribir (suma) 
f in_de sde 

/ / cálculo de las ventas de todos los representantes 
/ / para un día determinado 
leer (númdía) 
suma 4 - 0 

desde r <- 1 hasta 16 hacer 

suma 4 - 0 

desde z +- 1 haeta 5 hacer 

suma 4 - suma -+ ventas [r , númdía, z ] 

f in_desde 
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eacribir ( suma) 
f in_dôBde 
f in 


6.28. Disponemos de un array unidimensional de MáxLista elementos de tìpo cadena. Se desea hacer 
un procedimìento que inserte un elemento dentro deï array en una posición determinada respe- 
tando et orden que tenía t siempre y cuanâo haya sitio para hacer la operación , 


Análisis del problema 

Para insertar un elemento en un array es necesario desplazar los elementos anteriores una posíción 
hacia abajo ? siempre y cuando haya sitio para insertarlo. Para controlar el número de elementos ocupa- 
dos se utiliza una variabie n. Por lo tanto sólo podremos hacer la operación si n < MáxLista. 

Paxa dejar espacio para insertar el elemento se hará un bucle desde n hasta la posición donde se 
desea ìnsertar menos unoj y hacer que cada elemento pase alaposición siguientej es decir, a lista [ i+1 ] 
se le asigna lista [i ] * 


eiemento: Jaime 
posición: 4 


P 

n 


Ana 


Ana 

Bartolo 


Bartolo 

Carmen 


Carmen 

Manolo 


Jaime 

Victoria 


Manolo 



Victoria 














Una vez hecho esto en la posición deseada se introduce el nuevo elemento y se incrementa en 1 el 
número de posiciones ocupadas* 

A1 procedimiento se le pasan como parámetros el array (lista), el numero de elementos ocupa- 
dos (n), una variable lógica que informa si la operación se ha realizado con éxito (error), la posición 
donde se desea insertar el elemento (p), y el elemento a insertar (e). 

Diseho del algoritmo 

procedimiento InsertarEnLista { E/S vector : lista ; E/S entero n ; 

S lógico : error ; 

E entero : p ; E cadena : e) 
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var 

entero : i 
inicio 

/ / consideramos como error el que la lista esté llena o 

// o que la posición a- insertar mas allá del número 

// de elementos + 1 

error {n = MáxLista} o (p > n+1) 

si no error entonces 

deede i' «- n hasta p-1 incremento -1 hacer 

lista [î+1] «- lista [ i ] 

f in_deede 

lista[pj — e 
n — n + 1 

f in_sì 

f í n_pr oc e d imi en t o 


6.29* Disponemos de un array unìdìmensional de MáxLìsta elementos de tipo entero. Se desea dise- 
nar un procedìmiento que elimine un elemento deì array situado en una posición determinada 
que pasamos como parámetro t conservando el array en el mìsmo orden. 


Ânálisis del problema 

Para borrar un elemento es necesario subir todos los componentes de la lista* desde el lugar del eíemen' 
to a borrar hasta la posición n-1. EI número de elementos ocupados del array disminuirá en una 
unidad. E1 procedimiento detectará dos condiciones de error: que el numero de elementos sea 0, o que 
la posición a borrar sea mayor que el número de elementos* 


posioión: 2 


Ana 


Ana 

Bartoio 


Carmen 

Carmen 


Manolo 

Manolo 

n — > 

Victoria 

Victoria 
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Diseno del algoritmo 

prooedimiento BorrarDeLista (E/S vector : lista ; E/S entero : 

S lógico : error ;E entero :pï 

var 

entero : i 

inicio 

error — (n = 0) o (p > n) 
si no error entonces 

âesde i p hssta n hacer 
lista[i] *- lista [i+1] 
f in_desde 
n n ^ 1 
f in_si 

f in_procedimiento 


6.30, Algoritmo que triangule una matriz cuaârada y halle su determinante. En la$ matrices cuadra- 
das el valor dei determìnante coincide con el producto de los elementos de la diagonal de la 
matriz triangulada , muîtiplicado por -I tantas veces como hayamos ìntercambiado fllas al 
triangular la matrìz. 

Análisis del problema 


E1 praceso de triangulación y cálculo del determìnante tiene las siguientes operaciones: 

* Inicializar signo a 1 

* desde i igual a 1 hasta m-1 hacer: 

a) Si el elemento de lugar (ì,i) es nulo s intercambiar filas hasta que dicho elemento sea no 
nulo o agotar los posibles ìntercambios. Cada vez que se intercambia se multiplica por -1 el 
valor de la variable signo, 

b) A continuación se busca el primer elemento no nulo de la flla i-êsima y P en el caso de 
existir, se usa para hacer ceros en la columna de abajo. 

Sea dicho elemento matriz[i,r] 

Multiplicar fila i por matriz[i+l P r]/matriz[i,r] y restarlo a la i+1 
Multiplicar fila i por matriz^+^jrymatriz^r] y restarlo a la i+2 


Multiplicar fila i por matrìzfm^rl/matrizti^r] y restarlo a la m 

Se deberá almacenar en una variable auxiliarj cs^ el contenido de matriz[i+x, r] 5 para que, 
en las siguientes operaciones con la fila, no afecte el resultado de 
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raatriz[i+x, r+y] - matriz[i+x, r+y] - matrizp, r+y] * (cs / matriz[i, r]) 
a 

matriz[i+x, r] matriz[i+x, r] - matrizfi, rj * (matriz[i+x, r] / matriz[i, r]) 

• Asignar al determinante el valor de signo por el producto de los elementos de la diagonal de la 
matriz triangulada. 

Diseno del algoritmo 


algoritmo ejercicio„6_30 

const 



m - 

<expresión> 


n = 

<expresión> 

tipo 




array [1 ; 1..: 

var 

arr 

: matriz 


real 

: dt 

inicio 




// ..En ; este caso m y n serán iguales 


fin 


llamar_at leer_matriz (matriz ) 
llomr_a triangula (matriz f dt ) 
escriblr ( ' Det'erminante= J , dt) 


procedimiento leer_matriz (S arr : matriz) 

var 

entero: i,j 
inicio 

escribir ( 'Deme los valores para la matriz ' ) 

deade i 1 hasta m bacer 

desde j 1 hasta n bacer 
leer ( matriz [i, j ] ) 
f in_desde 
£ in_desde 
f i n_pr oc e dim i en t o 

procedimiento escribir_matriz (E arr : matriz) 

var 

entero : i,j 
carácter : c 
inicio 

escribir ( 'Hatriz triangulada' ) 

deade i «- 1 basta m hacer 
desde j *- 1 hasta n hacer 

escribir ( matriz [i, j ] ) // Escribir en la misma línea 

fin_desde 

escribir / / Pasar a la siguìente línea 

f in_desde 
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escribir ( ' Pulse tecla para continuar 1 ) 

Xeer (c) 

f ±n_pr ocedlmiento 

procedimiento intercjE/S re&li a,b) 
var 

real : auxi 
inlcio 

auxi +- a 
a +- b 
b 4 - auxi 

f ln_proceâimiento 

procedimìento triangula {E arr : matri2 ; S real d: t) 
var 

entero: signo 

entero; t , r, í , j 
real : cs 
inicio 

signo 4 - 1 

desde i 4- 1 haeta m - 1 hacer 

t +* 1 

ei matriz [ í , 1] = 0 entonces 

repetir 

fli matriz [ i + t, i] <> 0 entonces 
signo 4 - signo * (-1) 

desde j «- 1 hasta n hacer 

llamar_a interc (matrìz [í , j ] , matriz [i + 

f in_deade 

llamar_a escribir_matriz (matriz) 

fin_si 

t 4- t + 1 

hasta_íiue (matriz[i, i] <> 0) o (t = m - i + 

f in_si 

r ^ i - 1 
repetlr 

r +- r + 1 

hasta_<xue (matriz [i, r] <> 0) o (r = n) 
sl matriz [i, r] <> 0 entonceB 
deade t i + 1 hasta m hacer 
si matriz [t , r] <> 0 entonces 
cs «- matriz [t , r] 
desde j +- r hasta n hacer 

matriz [t , j ] <- matriz[t, j]-matriz[i, j] 
fin^desde 

llamar_a escribir jnatriz (matriz) 

f±n_fli 
f in_desde 
fin_si 
f ln_deflde 


t, j ] ) 


■ 1 ) 


* (cs/matriz[i, r] ) 
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dt signo 

deade î 1 haata m hacer 
dt ^ dt * matrìzCì, i] 
fin_desde 
f i n_pr o c ed imi en t o 


63 L Se desean aimacenar los datos de un producto en un registro. Cada producto debe guandar 
ínformación concernîente a su Código de Producto, Nombre t y Precio* Disenar la estructura de 
datos correspondiente y un procedimiento que permita cargar los datos de un registro. 


Anâlisis del problema 

La estructura de datos del registro utilÌ2ado va a tener tres campos simples: Código, que será una 
cadena de caracteres, Nombre, que será otra cadena, y Precio, que será un número entero. Como se 
utiliza un procedimiento de lectura, es necesario crear un tipo de dato Producto, que será el tipo de 
dato utilizado como parámetro at subprograma. 


Diseno del algoritmo 

tipo 

registro : producto 

cadena \ códìgo , Nombre 
entero : Precio 
f in 
var 

producto : p 


procedimiento LeerProducto ( S producto : p) 

inìcio 

leer (p*Código) 
leer (p *Nombre) 
leer(p*Precio) 

f i n_pr oce dìmì en t o 


632* Una farmacia desea almacenar sus productos en una estructura de regìstros. Cada registro 
tiene los campos Códìgo, Nombre, Descripción del Meâicamento (antibiótico, analgésico , etc.), 
Laboratorio, Proveedor, Precio, Porcentaje de IVÂ t Stodc y Fecha âe Caducidad . La fecha 
deberá guardar por separado el día, mes y ano. Disene la estructura de datos y un procedi- 
miento que permita escribir los datos de un medicamento. 
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Análisìs deí problema 

Es necesario un tipo de dato con el registro, ya que será utilizado como paráiqerio de un procedimiento, 
La estructura del tipo de registro tendrá los siguientes campos: Códìgo de tipo cadena,. Nombre de 
tipo cadena, Descripción también de tipo cadena, Precio de tipo entero, IVA que indica el por- 
centaje del IVA a aplicar en formato real (por ejemplo, 0.10 para un 10%), Stock de tipo entero y 
Caducidad. Caducidad será a su vez otro registro que tendrá los campos dd, rran y aa que seran 
los tres de tipo éntero. La definición de este 'último campo puede hacerse de dos formas; por una parte 
se puede defmir urt tipo de registro independiente, por ejemplo Fecha y luego hacer referencia a el en 
la defmición del dato Caducidad; también se podría definir el registro Caducidad dentro del 
registro principal, utilizando lo que se llaman registros anîdados. 


Análisis del algoritmo 
tipo 

registro : Fecha 

entero :dd, mm, aa 

f in 

registro : Medicamento registro 

cadena : Código , Wombre ; Descripción 

entero : Precio 

real : IVA 

entero : Stock 

Fecha : Caducidad 

fin 

ver 

Medicamento : m 

La declaración del tipo Medìcamento también se podría hacerde la siguiente forma sin necesr 
dad de crear el tipo Fecha: 

registro : Medicamento registro 

cadena : Código , Mombre, Descripción 

entero : Precio 

real : IVA 

entero : Stock 

registro : Caducidad 

entero : dd, mm, aa 

fin 

fin 

La implementacìón del procedimierLto dc escritura quedaría còmo sigue. 
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procadimiento EscribirMedicamento ( S Medicamento : m ) 

inicio 

escribir (m. Códígo) 
escribir (m. Mombre) 
escribir (m, Descripción) 
escribir (m. Precio) 
escribir (m, IVA) 
escribir (m. Stock) 
escribir (m, Caducidad. dd) 
escribir (m.Caducidad.mm) 
escrìbir (m, Caducidad, aa) 
f i n_p r o c ed imi e n t o 


6.33, Dìsenar ìa esîructura de datos necesaria para definir un cuadrìlátero uttlìzando coordenadas 
polares ♦ 

Análisis det problema 


Para defínir un Punto en el.plano utilizando coordenadas polares es preciso utilizar dos datos: el ángulo 
y el radio. Como cada inicio de línea es.el final del siguiente, se puede guardar sólo un punto por línea. 
Un cuadrilátero está formado por cuatro líneas, por lo que se puede defínir un registro Cuadriláte- 
ro que tendrá cuatro campos de tipo Punto, es decir, a su vez registros que guardan el ángulo y el 
radio del punto fínal de cada lado. Sin embargo, es preciso guardar también la posición de inicio de 
cada línea, por lo que además se guardará ía posìción de inicio de la primera línea en otro campo del 
registro Cuadrilátero. La dirección del ultimo lado será la misma que la de inicio. 


Diseno deî algorîtmo 


tìpo 

registro î Punto 

real : ■■ radio, ángulo 

fia 

registrp : : Cuadriláte-ro 

Purito : Início, ■ Ladol , Lado2 , Lado3 , Lado4 

f in 


634* Una empresa tiene aimacenados a sus vendedores en un registro. Por cada vendedor se guarda 
su DNÍ, Âpellidos, Nombre, Zona, SueìdoBase, Ventas Mensuales, Total Ànual y Comisión, Las 
ventas mensuales serâ un vector de 12 elemenîos que guardará las ventas realizadas en cada 
uno de los meses. Total Ànual será îa suma de las ventas mensuales del vendedor, La Comisión 
se calcuiará aplicando un porcentaje variable al Totai Ánual del vendedor. Dicho porcentaje 
variarâ según ias ventas anuales deî vendedon según ia siguìente tabia: 
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Hasta de 1,500.000 0,00% 

Más de 1.500.000 y hasta 2.150.000 13, 75% 

Màs de 2,150.000 y hasta 2.900.000 16,50% 

Más de 2. 900. 000 y hasta 3.350. 000 1 7, 60% 

Más de 3.350.000 18,85% 


Dicha tabla se habrá cargado de un archivo secuencìal que contiene tanto eî límite superior 
como el porcentaje. 

Disehar las estructuras de datos necesarias y realizar un algoritmo que permita leer los datos 
del empleado, calcule eî Total Anual y obtenga la Comisión que se lleva el etnpleado mediante 
la tabla descrita anteriormente, que previamente se habrá teniâo que cargar del archivo. 


Análisis del problema 

En este caso los campos del registro vendedor serán: DNI de tìpo cadena, Nombre de tipo cadena, 
Apellidos de tipo cadena, Zona también de tìpo cadena, Sueldo de tipo entero, Ventas que será 
un array de enteros, Total de tipo entero y Comìsìón que será real. Se defîne también un registro 
Para la tabla de comisiones. Aunque el enunciado hable de un límite inferior y otro superior, la tabla 
sólo va a tener dos campos: límite de tipo entero y Porcenta j e que será real. 

Para realizar el cálculo de la comisión se han de cargar previamente íos datos de la tabla en un 
array. Aunque lo más corriente sería mantener los datos de la tabla en un archivo, vamos a realizar la 
lectura de los datos desde teclado antes de la llamada al procedimiento que carga los datos del vende- 
dor. Hacer la lectura antes del procedimiento y no desde dentro de él, agilizará la operación de lectura 
del registro si hay que leer más de nno. En dicho procedimiento, para optimizar la búsqueda de los 
datos se obliga a que cada límite introducìdo sea mayor que el anterior. También se podrían haber 
introducido todos los datos y ordenar el vector con algunos de los métodos que se abordarán en el 
capítulo siguiente. 

E1 procedimiento de lectura leerá los campos DNI, Apellidos, Nombre, Zona y Sueldo, 
Para leer las ventas se debe utilizar un bucle que lea cada uno de los elementos de la tabla. Para calcular 
el total también es necesario recorrer el campo Ventas acumulando el valor de cada uno de los 
elementos. Para ello se utilìza una función SumarVentas que suma los elementos de un vector de 
enteros de n posiciones. 

La comisión se calculará utilizando la función CálculoComisión. Irá analizando 
secuencialmente los elementos de la tabla. Como los límites se hàn introducido de menor a mayor, 
cuando se encuentre un límite mayor que el total de las ventas, se habrá encontrado la posición donde 
está el porcentaje de comisión a aplicar. 

Por lo tanto, la arquitectura de nuestro algoritmo podría quedar de la forma siguiente: 
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Diseno del algoritmo 

algorìtmo ejercicio_6_35 

tipo 

array[l ít 12] de entero : vector 
registro i RegistroComisiones 
entero : Lími te , Porcenta j e 

f in 

registro : Vendedores 

cadana : DNI, ApellidoSy Nombre, Sona 
vector : Ventas 

entero : Sueldo, Total , Comîsión 

fin 

array [1. .5] de RegistroComisíones : Comisiones 

var 

Comisiones : TablaComisiones 
Vendedores : Vendedor 

inicio 

LeerTablaComisiones ( TablaComisiones ) 

LeerVendedor ( TablaComisîones , Vendedor" 

f in 

procedimiento LeerTablaComísiones £ 3 Comisíones : T ) 

var 

entero : i 
inìcio 

desde i «- 1 hasta 5 hacer 

/ / Por razones de facilìdad de búsqueda, el límite que deberemos 
// introducir será el inmediato superior al fijado en la tabla 
/ / descrita más arriba * Los valores a introducìr serían: 

/ / Límite Porcentaj e 
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1500001 

0.00 

2150001 

13,75 

2900001 

16.50 

3350001 

17.60 

9999999 

18.85 

Suponiendo que la venta máxima 

sea d 


leer (T , Límite ) 
leer ( T . Porcentaj e) 

fin_aesde 

fin_procedimiento 

procedimiento LeerVendedor ( E Comisìones : T; S Vendedores : v ) 

var 

entero : i 
inicio 

leer ( v . DNI ) 
leer ( v . Apellidos ) 
leer ( v . Nombre) 
leer ( v , Zona) 
leer ( v. Sueldo ) 
desde i «- 1 hasta 12 hacer 
leer(v.Ventas[i] ) 
fin_.de sde 

v.Total SnmarVentas ( v . Ventas f 12 ) 
v . Comìsión 4r- CálcnloComisión (T, v . Total) 

f i n_pr o c e d imi en t o 

etltero función SumarVentas( B vector : v ; E entero : n ) 
var 

entero : i , total 

inicio 

total 4r- 0 

desde i +- 1 hasta 12 hacer 

total +- total + v[ì] 
fin_desde 
devolver { total ) 
fin_función 

real función CálcnloComisión ( E Comisiones : T ; E entero : total ) 
var 

entero : i 
inicio 

i +- 1 

mientras T[i].Límite < total y i <> 5 hacer 
i i + 1 

f in_mientras 

/ /Si las ventas son mayores que el límite máximo (9.999.999) 

// saldríamos del bucle por la segunda condición, y i valdría 5 
devolver (total * T[i] .Porcentaje) 
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fin_función 


í 6*3 & Podemos deflnir un polígono definiendo las coordenadas de cada uno de sus lados ♦ Disenar la 
estructura de datos que permita definir un poiígono de lado n -con un máximo de 30 lados- y 
crear un algorìtmo que permita introducir las coordenadas cartesianas de caâa uno de sus 
lados , 

Análisis del problema 

Para definir un polígono de n lados, hay que defmir cada una de las líneas que lo forman. Para definir 
una línea utilizando coordenadas cartesianas ? son necesarias dos parejas de valores x, y que marcarán 
el Ìnicio y ei fín de cada línea en el plano. Por lo tanto se han de definir las síguientes estructuras de 
datos: 

* Punto para almaccnar Ia situación de un punto en el plano* 

* Línea, formado una pareja de puntos que conforman el inicio y fin de la línea. 

* Polí gono que será un array de líneas. E1 numero de elementos del array será de 30, ya que este 
es el número máximo que indica el enuncíado* De estos 30 elementos, sólo se rellenarán n, que 
será un parámetro pasado al procedimiento. 

Para introducir ios datos dei polígono el procedimiento recibirá como parámetro de entrada el 
ntunero de lados (n), que debe ser siempre mayor que 2, y devolverá el array de líneas como parámetro 
de salida. EÌ procedimiento írá preguntando los valores de cada uno de los puntos que confìguran el 
polígono, teniendo en cuenta que el fín de una línea será el comienzo de otra. E1 fmal de la última línea 
del polígono será el primer punto introducido. 


Diseho del algoritmo 
const 

MáxLados =30 // Niimero máximo de lados especificado en el enunciado 

tipo 

registro : Pnnto 

entero r x , y 
fin 

registro : Línea 

Pnnto : Inicio, f in 

registro 

array [ 1 . .30] de Línea : Polígono 

var 

Polígono : P 

entero ; n 
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procedimìento LeerPolígono ( S Polígono : P 

va.r 

entero s i 
iniclo 

i 1 

LeerPunto ( P [ i ] . Inicio) 

repetir 

LeerPunto ( P [ i ] .Fin) 
i i + 1 

P [ i] . Inioío +- P[i-l].Fin 

hasta_que i - n 

p[n] . Fìn C P [ 1 ] .Inìoio 

f in_pr oc ed imi en t o 

procedlmiento LeerPunto ( S Punto : p) 

inicio 

leer (p.x) 
leer (p.y) 
f in_jprocedimi ent o 


; B entero :n) 



